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Low Cost Add-On Storage for Your TRS-80*. 

In the Size You Want. 

When you're ready for add-on disk storage, were ready for you. 
Ready with six mini-disk storage systems — 102K bytes to 591 K bytes of 

additional on-line storage for your TRS-80 . 



• Choose either 40-track TFD-100 
or 77-track TFD-200 " drives 



drives 



• One-, two- and three-drive systems im- 
mediately available. 

• Systems include Percom PATCH PAK 
p\ ,M , on disk, at no extra charge. PATCH 
PAK " I'd e-oi itches and upgrades 
TRSDOS for 40- and 77 track operation. 

• TFD-100 - drives accommodate Hippy 
disks.' Store 205K bytes per mini disk. 

• Low prices. A single drive TFD-100' * 
costs just $399. Price includes PATCH 
PAK «M *dlsk. 

• Enclosures are finished in system- 
compatible Tandy-silver" enamel. 



Whether you need a single, 40- 
track TFD- 100' M add-on or a three-drive 
add-on with 77-track TFD-200 ,M s, you 
get more data storage for less money 
from Percom. 

Our TFD-100™ drive, for example, 
lets you store 102.4K bytes of data on 
one side of a disk — compared to 80K 
bytes on a TRS-80* mmi-disk drive — 
and 102.4K bytes on the other side, too. 
Something you cant do with a TRS-80" 
drive That s almost 205K bytes per 
minidisk. 

And the TFD-200™ drives provide 

197K I:.''- :i i hi 



— 197K 394K and 591 K bytes for one-, 
two and three-drive systems 

PATCH PAK #1' M . our upgrade 
program for your TRSDOS V not only 
extends TRSDOS' to accommodate 40- 
and 77-track drives, it enhances 
TRSDOS* in other ways as well. PATCH 
PAK sv* is supplied with each drive 
system at no additional charge. 

The reason you get more for less 
from Percom is simple. Peripherals are 
not a sideline at Porcom. Selling disk 
systems and other peripherals is our 
mam business — Ihe reason you get 
more engineering, more reliability and 
more back up support for less money. 



In the Product Development Queue » printer interface for using your TRS 80 with any 
serial printer, and ihef lactnc Crayon ' '' to map your computer memory onto your color TV 
screen — lor games, animated shows, business displays, irapfcs etc Ctming POO! 
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To order aid-Oft mini disk slorsie lor your TRS-80*. 
or request additional literature call Percom s loll tree 
number 1800 577-1592 For detailed Technical irefor- 
malioii call (214)27? 3421 

Orders may be paid By cneck or money order, or 

>MS 

residents must add 5% sale 

Percom 'peripherals for personal computing' 




The easiest, least expensive way to generate 

spectacular multi-color graphics, sharp two-color alphanumerics: 

Your computer, a color tv set and the Percom Electric Crayon™. 



Add the Electric Crayon™ to your 
system and your keyboard be- 
comes a palette, the tv screen 
your medium. 

You dab and stroke using one- 
key commands to create dazzling 
full-color drawings, eye-catching 
charts and diagrams. 

Or you run any of innumerable 
programs. Your own BASIC lan- 
guage programs that generate 
dynamic pyrotechnic images, 
laugh-provoking animations. 

From a combined alphanu- 
merics-semigraphics mode to a 
high resolution 256- by 192- 
element full graphics mode, the 
microprocessor-controlled Electric 
Crayon™ is capable of generating 
10 distinctly different display 
modes. 

Colors are brilliant and true, and 
up to eight are available depend- 
ing on the mode. 

As shipped, the Electric 
Crayon™ interfaces a TRS-80* 
computer. It may be easily 
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adapted for interfacing to any 
computer or to an ordinary parallel 
ASCII keyboard. 

But that's not all 

The Electric Crayon is not just a 
color graphics generator/control- 
ler. 

It is also a complete self- 
contained control computer. With 
built-in provision for 1K-byte of 
on-board program RAM, an 
EPROM chip for extending EGOS™, 
its on-board ROM graphics OS, 
and a dual bidirectional eight-bit 
port — over and above the com- 
puter/keyboard port — for 
peripherals. The applications are 
endless. 

Shipped with EGOS™, 1K-byte of 
display memory and a com- 
prehensive user's manual that in- 
cludes an assembly language list- 
ing of EGOS™ and listings of 
BASIC demo programs, the Elec- 
tric Crayon™ costs only $249.95. 



Options include: 

• LEVEL II BASIC color 
graphics programs on 
minidiskette: $17.95. 

• A 34-conductor ribbon 
cable to interconnect the Elec- 
tric Crayon™ to a TRS-80*: 
$24.95. 

• RAM chips for adding re- 
fresh memory for higher den- 
sity graphics modes: $29.95 
per K-byte. 

• Electric Crayon™ 
Sketchpad, a sketching grid 
of proportioned picture ele- 
ments (pixels) in a tv aspect 
ratio. For 128 x 192 or 256 x 
192 graphics modes. 11 -inch 
by 17-inch, 25-sheet pads: 
$3.95 per pad. 

SYSTEM REQUIREMENTS: the video cir- 
cuitry of the Electric Crayon™ provides di- 
rect drive input to a video monitor or mod- 
ified tv set. An internal up-modulator for rf 
antenna input may be constructed by add- 
ing inexpensive components to the existing 
video circuitry. 
Prices ana specifications suDieci 10 change without notce 




PERCOM DATA COMPANY. INC 

211 N KIRBY GARLANO TEXAS 75042 
(2141 272 3421 



'" ■ trademark ot Percom Data Company, Inc. 

• trademark ot Tandy Radio Shack Corporation which has no relationship to Percom Data Company 

Get into computer color graphics the easy, low-cost way with a Per- 
com Electric Crayon™. Available at Percom dealers nationwide. Call 
toll-free, 1-800-527-1592, for the address of your nearest dealer, 
or to order direct if there is no Percom dealer in your area. 
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SPECIAL DELIVERY with EXTRACT 

A 100% Machine Language Word Processor a 



TRS-80"' + Electric Pencil R or Radio Shack's Scripsit 



We can't stop improving and expanding the capabilities of your 
TRS-80* ! By using SPECIAL DELIVERY with EXTRACT and either 
Electric Pencil" or Radio Shack's Scripsit" you can get even more 
out of your computer. From just one program, you will get all this: 



MAILFORM: Create MAILFILE: The 
ONLY complete name and ad- 
dress list entry /editor program 
written in machine language. 
Instant search on any field, 
complete cursor control, just 
till in the form! 

MAILRITE: Print letters written with 
either the Electric Pencil- or 
Radio Shack's Scripsit" insert- 
ing information from a MAIL- 
FILE into the letter for person- 
alizing and addressing. You 
can send a personalized letter 
to one person then a different 
personalized letter to a second 
person with true typist quality 
from your fine printer. Fea- 
tures: Indents, Underscore, 
Bold Type, End of Page Stop, 



Address Envelopes, unlimited 
insertion from address list and 
More! 

EXTRACT: Take out information 
from MAILFORM, the ma- 
chine language mailing list. 
Find the names you need by 
Zip Code, Street Address, 
Gender, Age or any other way! 

SORT: In-Memory sort on an entire 
address list using any field as 
the key. This program can sort 
an entire list in a matter of 
seconds! 

LABEL: Prints labels from MAILFILE. 

CONVERT: Make MAILFILE from 
RS mail list. 



SPECIAL DELIVERY will run on your TRS-80" with TRSDOS," NEWDOS' or any 
other TRS "-like DOS. 

If you bought SPECIAL DELIVERY from us, send us the disk and we will update 
it to include EXTRACT for $25. If you haven't already taken advantage of our 
SPECIAL DELIVERY program, we'll send you the complete program including 
EXTRACT for just $125 (Disk). We can also send you the Electric Pencil* on Disk 
for $150. 



Software Etc . . . 
1839 Chamberlain Drive s** 
Carrollton, Texas 75007. 
Phone Orders: (214) 492-0515 




Demand a Demonstration from vour local Dealer or write tor a brochure of our ( omplete line ot tine software 
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META TECHNOLOGIES 



Fellow TRS-80 User: 

I'd like to thank you for your interest in our products, and, as our president, Bob Fiorelli. 
promised in our March ad, tell you something about MTC Product Engineering. The term 
"Engineering" may be misleading. A product offered for sale may involve research and 
development, design, implementation, test marketing, follow-up evaluation, re-engineering, 
secondary distribution and exhaustive testing. A number of issues and factors are involved 
in our product selection and engineering: 

• The product should address the needs of a broad class of users. 

• The product should free the user from as many non-essential or 
redundant tasks as possible, so he can spend his time being creative. 

• The product should solve technical problems that most users would 
have difficulty solving themselves. 

• Groups of compatible products should exist, so that the effectiveness 
of each one is multiplied when used with the others. 

• The product should be "human-engineered" so that people can 
understand and use it. without wading through stacks of documen- 
tation (many people won't read it anyway). 

• The product should provide continuing benefit and lasting value. 

Take, for example, our programming tools. The same tools we offer for sale are used in our 
own development efforts The SUPERSEDE program is in constant use here at MTC. 
SUPERSEDE is a good example of a product that is simple in concept, easy to use. and ex- 
tremely effective in operation, especially when combined with other "programming tool" 
products. 

Another product that embodies many of our philosophies is AIDS-II. This product pro- 
vides users with an information management system that is simple to understand and use, 
and yet so powerful and effective that some customers are using it to virtually run their 
businesses within a week of its purchase. It provides continuing benefit to many diverse 
users, solutions to difficult technical problems, and compatible products (CALCS. MAILS, 
REFORGE, MINGLE) are available to multiply its effectiveness. As for human engineering, 
about 60% of the core of AIDS-II is devoted to making the system as simple and consistent 
as possible, while providing extremely flexible and powerful data management functions. 
Information management systems present some of the most demanding technical 
challenges and MTC excels in this area. 

Many users need good sources of educational materials and technical /reference informa 
tion. We have obtained or created several products to fill these needs, specifically H. C. Pen- 
nington's "TRS-80 Disk & Other Mysteries". REMSOFTs REMASSEM 1, and the MTC 
Technical Bulletin Service, with more to come. The MTC Technical Bulletins are intended 
for programmers. Their content is not merely comments on or a preview of Radio Shack 
publications. 

Finally, I'd like to clear up some questions regarding diskettes We sell Verbatim because 
they have the most widely recognized product and a deservedly fine reputation. Our disk- 
ettes are EXACTLY the same as available elsewhere at up to twice the price. Of the tens of 
thousands of diskettes we have sold nationally, less than one -tenth of one percent have 
been returned for any reason! We don't make our living selling diskettes. We sell them at 
our low prices to get your attention. Don't forget, a customer-appreciation month is planned 
in 1980 (we're not saying when). For one month, and one month only, we will sell a box of 
diskettes for $19.80. Sorry, one box per customer. 

We at MTC look forward to providing you with the quality products and service you 
deserve and should expect. If we offered you anything less, we wouldn't be Meta 
Technologies Corporation. 

Sincerely. 
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mTc-SHIRTS 

HIGH-QUALITY, POLY-COTTON 
BLEND T-SHIRTS. White with Navy Blue 
neck and sleeve "ringers". MTC logo on sleeve. 
Top quality transfers of your choice on front. 

Specify size (S.M.L.XL) and Transfer: 

• META TECHNOLOGIES MAKES EVERY BYTE 
COUNT! 

• DON'T TOUCH MY BITS! 
•RAM it! 

• MICRO LOVERS TAKE SMALLER BYTES! 

mTc-SHIRTS $5.95 



amcereiy. . /\ 

Alan R. Becker 
Product Engineering 



FILESORT $29.95 

For Model II $49.95 

Sort ASCII files by any combination of user- 
specified fields: ascending or descending, 
numeric or non-numeric keys. Optionally retains 
original file. 



MAILSORT(Model I) $19.95 

MAILSORT replaces existing sort in Radio Shack 
Disk Mailing List 4 system. Sort by an y combina- 
tion of fields, such as NAME, within CITY, within 
STATE. Hi-speed in-memory routine sorts 300 
records in approximately 60 seconds. Minimum 
32K recommended. 



MTC AIDS-II 

Ailing information? Doctor it up with AIDS-II. This 
Automated Information Directory System is user- 
defined, features user-specified fields and 
print/display formats, conditional record selection, 
updating of fields within records, sorting by any 
combin a tion of fields, and much more! Unique 
"windowing" capability allows directories of 
unlimited size. Window size is typically 200 or more 
records in 32K. Can be used for mailing lists, client 
reference reporting, appointment "calendars", in- 
ventory records and other information systems. 
Easy to use. Defining a system takes about a 
minute. Formatting a report or defining a custom 
label, less than 30 seconds. Sorting 200 records 
takes less than 5 seconds. Add "subsystems" for 
additional capabilities. 

MTC AIDS-II $49.95 

For Model II $79.95 

CALCULATION SUBSYSTEM (CALCS) 

Use for report generation involving basic manipula- 
tion of numeric data, such as quantity & cost com- 
putations, balances carried forward and columnar 
totals. Expands capabilities with respect to inven- 
tory, accounting and other numeric-based informa- 
tion systems. 

MTCCALCS $24.95 

For Model II $39.95 

MAILING/INFORMATION LIST 
SUBSYSTEM (MAILS) 
Use for report & label generation involving format- 
ting of primarily non-numeric data, such as 
custom, N-up" and "N-copy" label forms, index- 
type report formatting, and sub-fielding 
capabilities for selection t print. Expands AIDS-II 
with respect to client/ product reference systems. 
mailing lists and other non-numeric information 
systems. 

MTC MAILS $24.95 

For Model II $39.95 

RECORD/FILE ORGANIZATION 
EXECUTIVE (REFORGE) 

Use for expanding, contracting or reformatting 
AIDS-II files. Convert random & sequential files to 
AIDS-II format. Use for converting mailing lists to 
AIDS-II. Includes MERGE & PURGE capabilities for 
combining smaller files into larger ones and remov- 
ing duplicate records. 

MTC REFORGE $24.95 

For Model II $39.95 



* 



PEEK&POKE $14.95 

Frustrated because PEEK and POKE have been 
removed from Model II BASIC?. Satisfy your 
curiosity with PEEK4POKE from MTC. Included 
are 8-bit and 16-bit (LS8. MSB) serf- relocating 
machine language routines, instructions, and demo 
program. 



Transfer PROGRAMS and DATA 
from MODEL I to MODEL II 

TRAN-SEND 



$49 95 



by MTC 



Requires MODEL II and MODEL I with disk & 
RS 232 Simple to use. not a kit - nothing else to 
buy. Complete with custom cable. $'■»" & 8" flop- 
pies, instructions. May be used over phone lines. 

Custom Cable only $19.95 

Suitable lor use with Radio Shack* transfer program ACT 013!) 



6 • 80 Microcomputing, May 1980 



MAKES EVERY BYTE COUNT 

IN YOUR TRS-80" MODEL I OR MODEL II DISK SYSTEM 



PROGRAMMING ■**<■*£ FREE 

1YV\I C Any 5, $79.80 

lUULO For Model II $119.80 



• NEW* *NEW* 

TDAM $19.95 

For Model II $29.95 

Having trouble with RANDOM FILES? With MTC* 
Table-Driven Access Method (TDAM) you'll never 
fret over FIELDing again. No knowledge of 
random access files is required. Insert the TDAM 
"interpreter" into any BASIC program and type in 
a few DATA statements describing the information 
in your files. TDAM does the rest! Reads and 
writes fields and records of any type (even com- 
presses a DATE field into 3 bytes!). Features 
automatic file buffer allocation/deallocation, 
memory buffering, sub-record blocking/de- 
blocking, and handles up to 255 fields per record. 
Super fast and super simple! Complete with 
TDAM interpreter, instructions and demo pro- 
gram. 



SIFTER $19.95 

For Model II $29.95 

Twelve in-memory high-speed sorts for use in any 
BASIC program: stable, non-stable, with/without 
tags, for numeric or string data. Random File 
Sort included. Some sorts written in machine 
code. Includes sort subroutines, demo programs 
and instructions. Relocate as needed with 
REBUILD. 



SHRINK $19.95 

For Model II $29.95 

Makes Every Byte Count!. Make programs 
smaller and faster! Combines lines & removes un- 
necessary code including remarks, without alter- 
ing program operation. Typically reduces pro- 
gram size 25% to 40%. 



DIVERGE $19.95 

For Model II $29.95 

Compares two BASIC program files, showing the 
differences between them. Identifies A lists lines 
which have been inserted, deleted. & replaced. 
Use for version control. 



P 



REBUILD $19.95 

For Model II $29.95 

Reorganize programs for adding program code, 
faster execution, readability. Much more than sim- 
ple renumbering. Rearrange groups of statements 
within a program - automatically updates 
references to line numbers. Use with 
SUPERSEDE and MINGLE for maximum effect. 



SUPERSEDE $19.95 

For Model II $29.95 

A "must have" for the professional programmer 
or the serious amateur. Probably one of the 
greatest time-savers available. Write programs in 
shorthand - change variable names - generate 

Qram documentation - use with REBUILD and 
QLE to build new programs from old ones. 



MINGLE $19.95 

For Model II $29.95 

Merge two files (Program or Data) into a single 
file. Data files may be merged in ascending or 
descending sequence with the ordering based on 
a user-specified comparison field. A very handy 
utility for consolidating data files. 



Single sided. Single density. Soft-sectored 

DISKETTES 



Verbatim 5 V* -inch 



$24 



95 

Box of 10 



Hard-sectored (10-hote). Box of 10 $26.95 

8-inch FLOPPIES 

Single-density. Box of 10 $29.95 

Double-density. Box of 10 $39.95 

PLASTIC LIBRARY CASES 

5 '/4 -inch or 8-inch diskette case $3.25 

5 V* -inch or 8-inch diskette case 

(when purchased with each Box of 10) . . . $3.00 

FACTORY FRESH. ABSOLUTELY FIRST QUALITY 
Minimum order 1 box. NO order limit! 



Complete for Model I with all utilities 
Plus exclusive MTC QUE card! 

NEWDOS +11 

$99 



QR by Apparat 
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MTC TECH B.S. 

Our exclusive Technical Bulletin Service reveals 
the inside story on the TRS-80' I & II. Sent by first 
dass mail, bulletins are issued as the news breaks, 
not just once a month. Expensive, but worth it! No 
advertising or flyers, just pure Technical B. S.! 
Cancel any time - unused balance refunded. Free 
year-end subject index with 12-month subscrip- 
tion. Subjects have included "PEEK&POKE func 
toons for Model II", "Machine Language Sort for 
String Arrays", "Tandy Marketing Plans", and 
"Level II Memory Locations". Subscriptions may 
be back-dated to obtain previous Bulletins. 

1-Year Subscription 

(Includes free index) $36.00 

Monthly Subscription $3.00/mo. 



Let your TRS-80" Teach You 

ASSEMBLY 
LANGUAGE 

REMSOFTs unique package. "INTRODUCTION 
TO TRS-80* ASSEMBLY PROGRAMMING" in 
eludes ten 45 minute lessons on audio cassettes, a 
display program for each lesson providing illustra- 
tion & reinforcement, and a text book on TRS-80" 
Assembly Language Programming. Includes use- 
ful routines to access keyboard, video, printer and 
ROM. Requires 16K Level II. Model I. 

REMASSEM-1 $69.95 



40 TRACK VERSION $109.95 

includes REF. RENUM. SUPERZAP 
EDITOR/ASSEM., DISASSEM.. DIRCHECK. and 
more! This is the original NEWDOS with all of Ap 
parat's utility programs, plus any 2 MTC PROGRAM 
MING TOOLS (for Model I), of your choice. Includes 
exclusive MTC QUE (Quick User Education) card 



The petiect supplement for your 
NEWDOS + , from UG. Inc. 

"TRS-80 DISK AND 
OTHER MYSTERIES" 

by Harvard C. Pennington 

132 pages written in PLAIN ENGLISH packed with 
HOW TO information with details, examples and in- 
depth explanations. Recover lost files and direc 
tones, remove file protection, make BASIC pro 
grams unlistable. How to use SUPERZAP, recover 
from DOS errors and MORE 

TRS-80 DISK $19.95 



* 
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All products 

guaranteed for 

replacement only. 

Prices. Specifications & 

Offerings subject to 
change without notice. 
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MOST ORDERS 

SHIPPED 

WITHIN ONE 

BUSINESS DAY 



¥ 



QUANTITY 

DISCOUNT 

INQUIRIES 

INVITED 



WE ACCEPT 

• VISA 

• MASTER CHARGE 

• CHECKS 

• MONEY ORDERS 

• COD. 



r 



Add $2.50 for 
shipping & 
handling 
$2.00 EXTRA 
for COD. 
Ohio residents 
add 5'?% sales tax 




TO ORDER CALL TOLL FREE 

1-800-321-3552 

IN OHIO call (216)289-7500 (COLLECT) 

IYIeta Technqlligjes Corpora™ 

26111 Brush Avenue, Euclid, Ohio 44132 
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A nerve wracking 

two or three months 

pass with Uttle more 

heinc heard. 



'he problem of computer program theft is 
complex. One of the questions, which 
seems to have no answer is magnitude of pro- 
gram theft. So far, despite a repeated offer of 
$10,000 reward, no one has yet turned in a 
prosecutable case of an Instant Software pro- 
gram that has been stolen. 

Months of Work 

Let's suppose you have spent a few months 
writing a program and getting the bugs out of 
it. You submit the program to a publisher and 
hope for the best. In a few weeks you get word 
that your program is being actively considered 
for publication. 

A nerve-wracking two or three months pass 
with little more being heard. Have they shelved 
your hard work? Did it fall between the cracks? 

Eventually a big envelope comes in the mail. 
Your program is alive and well, but comments 
from associate editors have suggested several 
changes. One has added nearly two hundred 
lines of coding to make the program more fool- 
proof and another has changed two of your 
subroutines to speed operator interaction and 
sorting. 

You get to work again, updating the pro- 
gram and finally submit a finished version to 
the publisher. A few more weeks elapse and 
proofs for the documentation arrive. A test 
master copy of the program dump arrives, and 
the project is becoming a reality. 

You have perhaps several thousands of dol- 
lars in time invested and so has the publisher, so 
you're anxious to see the package in the stores 
and royalties coming in. 

A couple of weeks later you attend the local 
TRS-80 club meeting. When you arrive several 
fellows are running their systems and you try a 
new game. Just to your left you hear something 
which makes it plain that someone is running 
your program! Wow! They are obviously en- 
joying it and calling more fellows around to see 
it. Then, they start pulling cassettes out of their 
pockets to run off copies. 

One way to make this sort of theft difficult is 
to build obstacles into the programs that pre- 
vent them from being easily copied. No system 
will defeat a determined hobbyist from making 
a workable copy, but there are some which 
make it darned hard. This approach cuts the 
losses to programmers somewhat , and the work 
involved in committing the theft makes it clear 
that hobbyists really arc hurting someone seri- 
ously when they rip off program copies. 

Kasy Copies 

Instant Software programs are relatively 
easy to copy, but there is a reason for this. I feel 
that users should be able to make a backup 



copy of the original in case something goes 
wrong— like pushing the record button, instead 
of play, in the heat of excitement. I also like to 
access a listing to make changes in a program. 
One of the things you lose when you protect 
programs is the ability to list it. 

I am not naive enough to think that hobby- 
ists won't steal programs now and then. I was 
hoping that a $10,000 reward might act as an 
incentive to report a theft that led to a convic- 
tion. And, if someone were convicted, that 
might act as a deterrent. But my offer won't 
do any good unless someone walks off with 
$10,000 in his hands— and someone else is 
convicted of program theft, which is a felony. 

The law in this field is new. There are few 
precedents. I am convinced that program pub- 
lishing is similar enough to book, magazine and 
music publishing that it is prosecutable. 



It is a shame that some hobbyist will have to 
suffer the trauma of a jail sentence or fine for 
the benefit of this new industry, but someone 
may have to do it before program theft will be 
taken seriously. 

The courts are rather protective of copy- 
rights, so I'm anxious to get a few clearcut cases 
of program copying. The end result could be a 
real shot in the arm for the computer program- 
mers, who arc the biggest losers in program 
theft. 

Inhibit Growth 

Since the growth of the microcomputer busi- 
ness hinges on the availability of good soft- 
ware, unless something is done to eliminate 
program theft, the field's growth will slow. 
This benefits no one. A slow growth rate ns ill 
Continue lo next page 
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by Jim Perry 



You can please some of the readers all of the 
time, all of the readers some of the time, 
but you can't please all of the readers all of the 
time. 

It seems that 80 has displeased some readers 
in high places by printing the extracts from 
Harv Pennington's book TRS-80 Disk <& Other 
Mysteries (February 80). According to Radio 
Shack, no mention was made of the existence 
of their TRSDOS 2.3. 

Suffice it to say that TRSDOS 2.3 was only a 
rumor when the book was written and had not 
yet been released when the article was prepared. 
As a result of this article, Radio Shack has can- 
celed their advertising contract with 80. 

By way of rebuttal I would like to extract a 
portion of the introduction from Harv's excel- 
lent book. It sums up my feelings, beautifully. 



On the whole the TRS-80 is a pretty neat ma- 
chine. In fact, I love my TRS-80. Just a few 
short years ago, a computer with the power and 
capability of the TRS-80 would have cost sever- 
al hundreds of thousands of dollars, required 
an air conditioned room of considerable pro- 
portions and a staff to operate it. Certainly, the 
Tandy Corporation deserves all the credit 
possible for the development, production and 
distribution of this magic machine. Tandy Cor- 



poration, I SALUTE YOU! 

Like all large corporations, the Tandy Cor- 
poration, seems to have continued success in 
spite of itself The initial success of the TRS-80 
was, I suspect, beyond the wildest dreams of 
anybody at Tandy. Since there was no way to 
measure their success against a similar product, 
at a similar price and with similar distribution, 
who is to say how successful they really were. It 
is my contention that they were only about fifty 
to sixty percent as successful as they could have 
been! 

Very quickly, as a result, an attitude of 
"don't-tell-us. we'll-tell-you" developed. The 
general quality of follow -on support, develop- 
ment and software was abysmal. Information 
about the workings of the system was (and is) a 
carefully and jealously guarded secret. It 's as if 
"WE, " the users, "couldn't possibly know a 
damn thing or figure it out" and only the High 
Priests of Tort Worth, when they deem it propi- 
tious, will tell us what we need to know. 

So, if I lend lo excoriate (a fancy word mean - 
ing, "give 'em hell") the Tandy Corporation 
t Radio Shack), it is only because I would like to 
see them turn around their damn superior at- 
titude and realize thai the thousands of you out 
there are doing more than you are being given 
credit for and should be listened ht. Instead of 
'THEM' telling vou; 'YOU' tell them. ■ 
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inhibit good hardware production. Stores will 
be limited, and people will stop writing pro- 
grams. 

My suggestion is that computer stores, in- 
cluding Radio Shack, keep a very close watch 
on demonstration systems and make sure that 
youngsters are not left free to dump copies of 
demo software onto their tapes or disks. Make 
sure that customers buying systems pay for 
each and every program taken. 

Gubs should set a fixed rule regarding soft- 
ware: No copying at club meetings. 

Copyright suits can be very expensive for vi- 
olators. One of the big map companies makes 
several hundred-thousand dollars a year in 
judgements when people and firms make copies 
of their maps without realizing those maps are 
copyrighted. Many a club newsletter has taken 
a photocopy of a gasoline company road map 
and indicated the site of a meeting only to have 
the members sued en mass and individually by 
the map company. 

I am quite serious about the $ 10,000 Instant 
Software, Inc. is offering and am anxious to 
pay it. As I write in the 1SI booklets, when your 
best friend asks you to run off a copy of an ISI 
program you have to be damned sure that he 
wants the program more than the $ 10,000. 

All of us want the same end result, a healthy, 
rapidly growing microcomputer industry. I've 
set the prices for Instant Software as low as 
possible to discourage ripoffs. But low prices 
are only possible with massive sales. 

A programmer has to make several thousand 
dollars in royalties if he is going to continue to 
write more programs. I've set the standard for 
the field at 20 percent royalty: very' high. I did 
that because 1 wanted to make program writing 
so profitable that we have a good supply of top- 
notch programs. This will be best for the indus- 
try, for programmers even program publishers, 
in the long run. 

I'm open to any ideas, suggestions or argu- 
ments on this subject, but this should keep 
things going for a while. 



80 Expo 

Acting on an ad in a Boston paper, I drove 
down to see what Radio Shack was doing with 
their "TRS-80 Expo" at the Park Plaza Hotel. 
1 found quite a crowd gathered in the grand 
ballroom. 

The Radio Shack dealers were there in force 
with TRS-80 systems in special rooms showing 
specific programs, plus another 32 systems set 
up in the main ballroom. They were putting on 
shows every couple of hours for businessmen. 
The show started with a film introducing the 
TRS-80 and Radio Shack, then it went into 
demonstrations of the software which has so 
far been completed for the Model II. Most of 
the demo units were Model II systems. 

I talked with some of the Radio Shack peo- 
ple. 

The show was well done, and Radio Shack 
was taking orders at a pretty good clip as a 
result. A friend of mine accompanied me to the 
show and after thinking it over for a couple of 
days, ordered a 64K Model II with which he 
hopes to run his mailing list . ■ 



Robert Epstein, 

a Harvard 

doctoral 

candidate, 

using a TRS-80 

in his research 
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by Sherry Smythe 



Looking for an unusual application of the 
TRS-80, took me to the world-renowned 
laboratory of Dr. B. F. Skinner of the Depart- 
ment of Psychology and Social Relations at 
prestigious Harvard University in Cambridge, 
MA. His lab is composed of offices, rooms 
with caged animals, minicomputer equipment 
and rooms containing racks of electronic relays 
whose wires run to a series of experimental 
chambers. Tucked away in what appears to be a 
large closet is a TRS-80 Level II with 32K RAM 
and an expansion interface wired to those same 
chambers. 

Dr. Skinner is performing behavior modifi- 
cation experiments using pigeons, monitored 
by a TRS-80. 

Monitored by Relays 

Even at Harvard, grant money is tight. 
Robert Epstein, a doctoral candidate working 
with Skinner, needed some research done 
cheaply and quickly. He thought the TRS-80 
was a logical alternative to expensive computer 
equipment for this sophisticated control appli- 
cation. 

He is using interface equipment from Alpha 
Products Company and has added an 8-bit 
latching bi-directional port. By adding relays 
and a silent printer he monitors an experiment 
which can change 12 to 13 times per second. 

Epstein's TRS-80 is running a special 
machine language program first published in 
Behavior Research Methods and Instrumenta- 
tion that processes all information fed to it 
from the relays. 

The purpose of Skinner's experiments is to 
discover how behavior is controlled. Within the 



chambers — specially designed observation en- 
closures — his captive birds manipulate some 
specific devices by pecking, eating, drinking, 
etc. 

Picture an orange crate made of acrylic that 
houses two pigeons, one on each side of a trans- 
parent partition. Each pigeon is visible to the 
other, but pigeon I is the only one that can see a 
light flash, randomly green, red, or yellow. 
When the light flashes, pigeon I must translate 
the color to a coded symbol, marked on the 
wall clearly visible to pigeon 2. 

The Experiment 

Let's say green color has an X for the sym- 
bol. When the green color flashes, pigeon 1 
must peck the X from three symbols. Pigeon 2 
then pecks a box labeled Thank You and auto- 
matically feeds pigeon 1 . 

Pigeon 2 must then recall the symbol that 
pigeon I pecked and translate it to the proper 
color, in this case green, which appears in ran- 
dom order with red and yellow. If he pecks cor- 
rectly on his first try, pigeon 2 gets fed as well. 

After watching a few experiments controlled 
by the TRS-80, Epstein explained that the DEC 
equipment and all the other minicomputers in 
the lab, costing many times the price of the 
TRS-80, were all dedicated machines, but could 
do nothing except their one program. His TRS- 
80, when it had completed its function, was a 
partner for backgammon. Quoting Epstein 
about the 80, "This is causing a revolution in 
lab research!" 

If you know of any TRS-80 applications that 
might interest our readers, please drop me a 
Line. ■ 
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SO ACCOUNTANT 



by Michael Tannenbaum C.P.A. 



The Model II 

operating system 

Version (J. 2) seemed 

to Hork immediately. 



t last the soul searching is over, I just re- 
ceived my new Model II. Compared to 
the painless way I slipped into ownership of the 
fully loaded Modet I, the jolt was considerably 
greater. It's one thing to spend $899 and 
another to cough up $4,400. 

Unfortunately, I realized that I had to spend 
$ 1 , 100 or more for the additional drive to have 
a workable system. At least I avoided the start 
up problems associated with TRSDOS 1 .0, 1.1, 
2.0 and 2.1. The Model II operating system 
(version 1.2) seemed to work immediately. 

Compare Model II 

I am sure that by this time almost every 80 
fan has had an opportunity to compare the 
Model I to the Model II. Ownership, however, 
highlights some jarring differences. The first 
thing I noticed was the noise. The Model II has 
a very busy fan and a disk that runs constantly. 

Another difference is the keyboard layout. 
Where Model I has 63 keys, the Model II has 
76. Since the computer powers up in lowercase 
and the DOS requires uppercase, I had some 
difficulty entering commands. (Yes, I know it 
helps to read the manual.) 

The next big surprise occurred when I called 
up BASIC. Compared to the Model I, BASIC 
takes considerable time to load in the Model II. 
Once loaded, the Model II executes an auto- 
matic "? MEM" and indicates the number of 
files requested. Surprise — unless you designate 
files, none will be allocated. There is no default 
as there is in the Model I. 

After reading the manual, 1 found a BASIC 
calling sequence very similar to NEWDOS. 
Both the files and the memory reservation have 
to be specified when the BASIC interpreter pro- 
gram is requested. 

I have an old Line Printer One. Because of 
the lack of motor cutoff, I got into the habit of 
leaving the printer off until it was required. For 
that reason, all of my programs PEEKed at the 
device control block to check the printer's 
status. 

Since the Model II does not have the ability 
to PEEK or POKE memory locations, this 
method of testing printer readiness is not arail- 
able. If the printer is not ready, you receive an 
I/O error message. When this occurs, you must 
execute a SYSTEM "FORMS" command. 
BASIC will temporarily transfer control to the 
DOS and you can alter or specify print param- 
eters desired. 

Transfer Program 

You should plan to keep your Model I for 
some time to transfer all that good software. 
Radio Shack has thoughtfully developed a 
Transfer program for the Model II and a Corn- 



DOS program for the Model I. With these pro- 
grams, an RS232 board in the Model I and a 
special cable, it is possible to transfer disk files 
to the Model II. 

Aside from some minor problems in the disk 
I/O routines, most of the programs that I have 
selected to transfer were converted without 
much difficulty. Because of this, I find it sur- 
prising that in so many instances there are such 
price differentials between Model I and Model 
II versions of a given program. Some programs 
are highly integrated into the Model l's ar- 
chitecture and will not function on a Model II 
without a significant revision. 

The major problem I had with my new 
Model II (aside from PEEKs, POKEs, and 
PRINTs) was careless programming on my 
part. I had gotten into the habit of leaving out 
the "THEN" in an "IF-THEN" statement. 
This syntax violation is not tolerated by the 
Model II. If I had been consistant with the er- 
ror, I could have saved myself a lot of time. Un- 
fortunately, sometimes I put it in and some- 
times I left it out. 

Backup may be another stumbling block. 
You cannot just duplicate a disk. Backup on 
the Model II is a two-step procedure. First you 
must "FORMAT" the blank diskette and then 
you may execute the "BACKUP" program. 
Better be patient. A backup procedure involv- 
ing a 500K diskette is a much slower procedure 
than on the Model 1. Even if you have two 
drives on your system it will take several 
minutes. If you have only one drive you may 
have to insert the backup copy and remove the 
source up to 10 times. 

Enough teething problems. With the big 
disks and a full speed CPU of the Model II, ac- 
counting applications are a natural for almost 
any size business. 

Series One Accounting 

A good example of this new wave application 
software is the Radio Shack, Accounts Receiv- 
able-Series One (Cat. #26-4554), developed by 
Retail Sciences, Inc., for the ill-fated Tandy 10. 

Since it is designed for a one drive system, the 
capacity is somewhat limited. A maximum of 
800 customer accounts are permitted. The sys- 
tem uses a single file for both the customer 
master records and transaction details. Since 
the file capacity is 1743 records, using the max- 
imum number of customer accounts reduces 
the capacity of the system. 

For example, if you have only 200 accounts, 
you will be able to accommodate up to 1543 
open items or an average of a little over seven 
per account . For 800 accounts only 943 transac- 
tions are available, which is only a little over 
one open item per account. Since a typical ac- 



count could have an invoice, a payment and a 
credit transaction posted to complete a sale, 
this is an unhealthy situation. 

The designers of the system were aware of 
this problem. For that reason, they allow the 
user to specify either a balance-forward or 
open-item method for each account. This fea- 
ture is rather unusual for receivables systems. 
Most require the same method for all accounts. 

Another unusual feature is a provision for 
"automatic" billing. It allows you to specify an 
automatic amount to bill on a regular basis. 

The package also includes an invoicing 
module. The module eliminates the need for a 
separate billing program and if utilized, can be 
very useful in reducing invoice preparation 
time. 

The program has several automatic features 
which include extracting the billing address 
from the receivable files. This address can be 
designated as the "Ship to Address" or a 
separate "Ship to Address" can be specified if 
desired. Automatic selection of the date and 
"Net 30 days" terms are also provided. Addi- 
tional features include automatic extensions, 
tax calculations and invoice totalling. 

The invoicing module only provides input to 
the accounts receivable ledger. However, be- 
cause the program documentation is excellent, 
modification should be possible to generate a 
data file which could be used for sales analysis 
or inventory maintenance purposes. This will 
require modification of the disk file structure 
supplied by the Shack, since the system disk has 
no room available for additional files. This lack 
of memory space is because of the file preallo- 
cation facility of TRSDOS which speeds up ac- 
cess to the records in the data File. Reducing file 
allocation to accommodate invoice details, 
detracts from the performance of the receivable 
system. 

Because the system was originally intended 
for the two-drive Tandy 10, it is possible to 
separate the data and systems diskettes. If this 
is done, an invoice detail file can be created on 
the system's disk for subsequent analysis. 

The package represents a significant im- 
provement over the Radio Shack products re- 
viewed to date. Not only is the user documenta- 
tion excellent, but the program listings contain 
remarks which identify each subroutine. File 
descriptions, indicating variable assignments 
and field length, are also provided. This data 
makes modifying the system to fit individual 
needs considerably easier. 

If the Accounts Receivable-Series One is rep- 
resentative of the Model II software that will be 
forthcoming, I should be very happy that I pur- 
chased the machine. ■ 
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1 . Outlasts every competitor— 200 000,000 
character head warranty 
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Connects directly to TRS-80!* APPLE* and 
other computers 


2. No duty cycle limitations— even in demanding 
business applications 

3. Professional print quality — 9 x 7 matrix 
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Block graphics— 64 shapes for charts, 
graphs, diagrams 

Friction and pin feed 


4. Rugged business use construction — metal 
chassis — two motors 

5. 80 characters per second 

6. Upper and lower case — full 96 character 
ASCII set 

7. Double width characters 


11 
12 

13 
14 


Plain paper — up to 3 parts 

6 and 8 lines per inch — program controlled 
paper savings 

80 and 1 32 columns — program controlled 

Price— the best value in the industry Call or 

write today for the name of your local 

MicroJme 80 dealer 
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All fourteen are standard with every 
Microti ne 80. The only options are 
snap-on tractors and a buffered (up to 
2000 characters) RS232 interface. 
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With all these 

shortcomings, do I 

recommend the book? Yes, 

without hesitation. 



Learning Level II 
David A. Lien 
Compusoft Publishing 
San Diego, (A, 1979 
352 pages, softcover 
$15.95 

by Kverell Ogden 

David Lien's Learning Level II is written 
for people who have mastered Level I as 
well as for people who have just bought a Level 
II machine and know nothing about computer 
programming. 

Lien's book does not repeat the material in 
the Level I manual; instead it includes correc- 
tions and a double set of cut-and-paste pages to 
convert that manual to Level II. It covers the 
new capabilities of Level II in the style of the 
Level I manual. 

The material is about the same as that in 
Radio Shack's Level II reference manual, but 
it's arranged for teaching, not reference. For 
limited reference use there is a single-page in- 
dex. 

The book doesn't cover everything. The 
DELETE command is omitted, as are RAN- 
DOM, STRINGS, CDBL, C1NT and CSNG. 
Except for USR, the rest are covered to my sat- 
isfaction. 

Lien rightly avoids discussion of machine 
language as much as possible, but I'd like more 
on communicating between machine language 
and BASIC for those who have some familiari- 
ty with both. 

Particularly well covered are the editor (two 
chapters), PRINT USING (two chapters, in- 
cluding an exponential format my older 
manual mentions only in its statement sum- 
mary), strings (six chapters and parts of others) 
and error messages (one page each). 

Real Complaint 

My only real complaint about the book is the 
number of typographical errors in it. Most arc 
in the text. These are obvious and won't cause 
any trouble. But many of the typos are in the 
programs or sample runs where they might con- 
fuse beginners. 

I had planned to comedown hard on typos in 
this review, but a few days after I got the book I 
received an errata sheet from Compusoft with 
over 40 corrections. It listed all the important 
errors I had caught and many more I'd missed. 

There are some other problems as well. In the 
section on converting Level I tapes to Level II, 
Lien says that the lack of abbreviations in Level 
II will lengthen programs and may make indi- 
vidual lines too long. This is not true. 

Each Level I abbreviation takes at least two 



bytes. Its Level II counterpart is stored in one 
byte and is only spread out to the lull word 
when listed on the screen or printer. 

Also, since all Level I words are less than 
ihree times as long as their abbreviations, a 
converted line's listing would be less than three 
times as long as the original. Since Level 1 per- 
mits 70 characters per line, and Level II allows 
255, there is ample space for conversion. 

Later Lien suggests that the data conversion 
tape is so complicated that it's easier to write a 
Level I program to list the data on the screen, 
then write it down and re-enter it into your con- 
verted Level II program. Few people own both 
Level l-Level II systems, so it's not a very prac- 
tical suggestion. 

Recommended Reading 

With all these shortcomings, do I recom- 
mend the book? Yes, without hesitation. If you 
are upgrading from Level I, you will get your 
money's worth. If you are starting on Level II 
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with no previous computer experience, this 
book is almost mandatory. 

Make sure you get a copy of the errata sheet . 
This should be automatic if you buy direct 
from the publisher, which may be the only way 
you can buy it. I haven't seen Compusoft 
books in any store. 

Lien is an excellent teacher and writer. What 
Compusoft needs now is an excellent proof- 
reader . ■ 



TRS-80 Micro Computer 
Technical Reference Handbook 
Radio Shack, 1978 
Fort Worth, Texas 
$9.95 

by James R. Fatz 



ave you ever wondered exactly what was 
going on inside that sealed keyboard of 
your TRS-80? I certainly have! 

The TRS-80 Handbook has put an end to my 
guessing. Written clearly and simply, anyone 
who has an understanding of hardware 
nomenclature will be able to keep pace with the 
book's technical data. Although the book is in- 
tended for a technical audience, it offers the in- 
quisitive 80 owner information on testing and 
analyzing. 

The book begins by displaying a dual page 
foldout of a system block diagram. This dia- 
gram puts the interactive circuits in perspective 
before the reader gets into a great amount of 
detail. The next page is a memory map of the 
Level I system identical to that contained in the 
Users Manual. 

The first section, "Theory of Operation," 
contains descriptive paragraphs on: CPU Ad- 
dress Lines, CPU Data Bus, CPU Control 
Group, System RAM, Video Divider Chain, 
Video RAMs, Video Processing, Keyboard, 
I/O Ports, System Power Supply and Level II 
ROMs. 



All these sections contain a detailed analysis 
of exactly what occurs, pin by pin, in the appro- 
priate circuitry during system operation. For 
example I was always mystified by the appear- 
ance of double- width characters on the screen. 
I discovered that this is normal when the system 
is placed in thirty-two character format. 

The second section, "Adjustments and 
Troubleshooting," is technical but interesting. 
I was surprised to find that the intermittent 
problems that I was having, were most likely 
caused by a solder ball rolling around. I elim- 
inated them by placing the keyboard unit on 
end and tapping it. 

In the "Outside World" section a short 
outline is given on how to interface the TRS-80 
with analog devices. A sample program shows 
how to control power to a coffeepot. 

Although short, the description of the Ex- 
pansion Port Edge Card pin connections is ade- 
quate and essential for "outside world" expan- 
sion. 

A complete Parts Listing makes up the next 
section. Divided into item and function sections 
these listings include the card symbols, elec- 
trical descriptions and part numbers. (An in- 
valuable aid to the do-it-yourselfer.) 

The final section contains schematics for the 
entire system. These include a Level II BASIC 
schematic and a complete TRS-80 schematic on 
two six-page foldouts. One thing that I find 
particularly useful is an exact copy of circuit 
board layout, which, unfortunately, is not in- 
cluded in the users manual. ■ 
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Problem Solving and 

Structured Programming in BASIC 

Bliol B. Koffman and Frank L. Friedman 

Addison-Wesley. 1979 

$11.50 

By Mikel Akkin 

Intertwined with a vacation last summer I 
spent some time combing bookstore shelves, 
in search of a book to make learning BASIC 
painless. My search revealed four general 
categories: those which assume that you are a 
moron, unable to find distal portions of your 
own anatomy; those ground out by the Fellow- 
ship of Dusty Textbook Writers; those which 
are terminology bound; and Problem Solving 
and Structured Programming in BASIC by 
Koffman and Friedman. 

Yen Readable 

I put this book in a class by itself because that 
is where it belongs. An introduction to both 
computing and BASIC, it is a reference worth 
having on your shelf. It is also readable. I began 
by skimming the earlier sections, but before 
long I was reading intently. 



First of all, the book is well printed. The text 
is sharp, the diagrams, figures and programs 
copious. Full and half-tone shading emphasize 
logical relationships. However, learning a com- 
puter language without a computer is rather 
like learning a foreign language with only a 
Berlitz record as a companion, that's why the 
book's graphic displays and examples are ex- 
tremely important. 

Each chapter follows the same format. After 
an introductory section establishes the purpose 
and general viewpoint, a small number of con- 
cepts and language structures are discussed in 
great detail. Each structure is shown enclosed 
in a box with its syntax and a precise description 
of its purpose. 

A section of common programming errors — 
unbelievably helpful— a summary of the topics 
covered in the chapter, and some exercises 
(solutions are provided at the end of the book) 
round out the chapter. 

A Collection of Dialects 

Since BASIC is not so much a language as a 
collection of dialects, you may be wondering 
which BASIC is presented. There are two 
answers. 

By treating the general operations that any 



Pascal: An Introduction to 

Methodical Programming 

by William lindlav and David Wall 

Computer Science Press 

Potomac, MI) 

306 pages, paperback 

$10.95 

by Chris Brown 
80 Staff 

Don't be misled by the title of this book. It 
is not strictly a Pascal handbook. The 
main purpose of the book is to teach the reader 
the techniques of methodical programming. 
The achievement of fluency in Pascal is actually 
a secondary objective. 

What, you ask, is methodical programming? 
A good question. As far as I can tell, it is 
synonymous with logical programming. Be- 
cause it is cross-cultural, this confusion in terms 
is the essential problem I had with the book. 

The Common Tongue 

That comment is not necessarily a condem- 
nation, but it should be taken as a warning. The 
edition, intended for use in an elementary pro- 
gramming course, was authored by two gentle- 
men from Scotland. Messcrs Findlay and Watt 
are lecturers in computing science at the 
University of Glasgow, and their approach to 
computing is more European than American. 
For instance, the authors make the assumption 
that Pascal is the lingua franca (the common 
tongue) of computing. This claim reveals the 
author's computing bias. In American comput- 
ing, if a common tongue exists at all, it is prob- 
ably BASIC. 

Aside from furthering the annoying practice 
of including foreign buz/words in English lan- 
guage texts, the book assumes the reader has no 



programming experience or mathematical ex- 
pertise. However, most students of Pascal in 
this country will have already had some experi- 
ence w ith computers. Starting from square one, 
may actually inhibit their progress. 

And remember this book is intended for 
classroom use. The style is businesslike, but for 
readers who learn their programming at the 
School Of Hard Knocks rather than the local 
university, it may not be the most efficient for- 
mat. 

Non-essential Topics 

The text is divided into six sections. Each 
contains chapters that include exercises (with 
answers). Topics that are not essential to under- 
standing are marked and can be skipped on 
first reading. 

This technique is symptomatic of the time 
constraints within which most college courses 
operate. However, if material is only tangential 
to the topic under discussion, why include it in 
the first place (especially in an introductory 
discussion). 

The book does include five appendixes deal- 
ing with such Pascal idiosyncrasies as syntax 
diagrams, reserved words, predeclared entities, 
input and output, etc. These are most useful. 

The book was produced by computer and as 
result the typeface and page layouts are rather 
primitive. Texts generated by computer are, in 
general, hard to read. While computers certain- 
ly have their place in our society, it is not yet in 
book production. 

The $10.95 price is reasonable in light of the 
outrageous sums routinely charged for limited 
edition, short lived college texts. The book's 
cost effectiveness for the independent hobbyist 
is another question. I think one can do better in 
an introductory Pascal edition than this Scot- 
tish college text . ■ 



BASIC is designed to perform, the authors 
show how BASIC works, regardless of whether 
your particular version differs in certain 
respects. The emphasized topics, top-down and 
structured programming, are language in- 
dependent . 

Secondly, the authors discuss three dialects: 
minimal BASIC; Dartmouth BASIC; and BA- 
SIC-PLUS (the Digital Equipment Corpora- 
tion variety). 

Although this leaves out some features avail- 
able on personal computers (PEEK and POKE, 
for example) and includes some not found in 
small BASICs (functions and subroutines, for 
example), once you have read this book you 
will be more prepared to read your system 
manual. 

I have a few complaints with some parts of 
the book. The IF-THEN and IF-THEN-ELSE 
statements, for example, are presented as iden- 
tical in all three versions of BASIC, but, they 
are not. This is only minor. 

With Problem Solving by Koffman and 
Friedman, my BASIC is becoming fluent. ■ 




57 Practical Programs & dames in BASIC 

Ken I radon 
Radio Shack. 1978 
Catalog #62-2008 
S3.95 

by James R. Fatz 

Finally! After so much time, the TRS-80sys- 
tem that you saw in the store window is on 
your desk waiting to do something useful. You 
already found out that it is awfully expenshe 
buying pre-programmed tapes. Now what? 

You might try 57 Practical Programs & 
Games in BASIC, but don't hope for much, 
even if it is from Radio Shack. 

.Although the book contains a wide variety 
of programs from Moments. Skewness and 
Kurtosi* io Space Wars, many of the programs 
simply do not work. Whether this is due to pro- 
gram logic or misprintings the result is ihe same 
—frustration. 

The errors contained in the programs range 
from the obvious, like a missing parenthesis, to 
very obscure ones such as reversed variables in 
assignment lines. 

One good point is that the programs are 
flowchartcd adequately. This can help you 
learn the relationship between program logic 
and flowcharting principles. It's too bad that 
more time was not spent proofreading than 
flowcharting. 

So beware. There are many special interest 
programs in this book, but it may take some 
debugging to get them to work on the 80. ■ 
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SO REVIEWS 



BASIC-IP 
Richard H. Shubert 
Small Systems Software 
Newbury Park, CA 
$19.95 

by Fred Btechmaa 



Many TRS-80 owners start out with a 
Level I machine, as I did, to learn pro- 
gramming and familiarize themselves with a 
microcomputer. However, even after buying 
so many Level I tapes and creating a number 
of Level I programs of my own, I couldn't re- 
sist the lure of Level II. After all, according to 
what I'd heard, a conversion tape supplied by 
Radio Shack with Level II would still allow me 
to use all my Level I programs. 

So I converted to Level II, only to find that 
the conversion tape supplied only converted 
Level I BASIC tapes, not machine language. 
Furthermore, some programs required con- 
siderable changes before they'd RUN proper- 
ly in Level II! 

Finally, the conversion tape expanded al- 



most all the Level I abbreviations, because 
Level II doesn't allow them, so my listings and 
printouts from my newly acquired printer 
were no longer in Level I abbreviated lan- 
guage! While this might not bother some peo- 
ple, it made it difficult for me to author arti- 
cles on Level I programs without resorting to 
my typewriter for an abbreviated Level I list- 
ing. 

Enter BASIC-IP 

1 tolerated this until recently, when Richard 
H. Shubert created his BASIC- IP tape from 
Small Systems Software. This program pro- 
vides full TRS-80 Level I BASIC capability 
for Level II 16K (and up) and also adds two 
Level I commands, LLIST and LPRINT, so 
you can now list your programs and control 
your printer from Level I BASIC. Schubert's 
program contains two additional commands 
that even Level II BASIC doesn't have, 
LPRINTON and LPRINTOFF. that allow 
you to print characters displayed on the 
screen! 

BASIC-IP is a machine language tape that 
loads into the top 4K of RAM with a SYS- 



The Programmer's Book of Rules 

by George Lcdin Jr. and Victor Ledin 

Lifetime Learning Publications 

Div. Wadsworth Publishing Company, Inc. 

Belmont, CA 

September, 1979. 256 pages 

$7.95 Paperback 

by Chris Brown 
80 Staff 

English language writers and editors, wres- 
tling with syntax, turn, in times of 
desperation, to a slim book of usage called The 
Elements of Style. 

Written in 1918 by an odd little man named 
William Strunk, this book of rules states, in no 
uncertain terms, exactly what is and is not al- 
lowed when constructing the English language 
(according to Strunk). Called affectionately, 
"Strunk," by its users, the book has become 
legendary in composition classes and editorial 
offices. 

Composing Is Composing 

Since composing computer language is simi- 
lar to composing human language, it is not sur- 
prising that The Programmer's Book of Rules, 
by George & Victor Ledin, is the computerese 
equivalent of Strunk's 1918 edition. 

The Programmer's Book of Rules is a list of 
272 programming do's and don'ts. Co-authors 
George and Victor Ledin are California-based 
educators. George Ledin is the head of the 
Department of Computer Science at the Uni- 
versity of San Francisco. His brother, Victor, 
has taught computer programming at U.C. 
Berkley, and for Intel in Santa Clara. 

Despite their academic backgrounds, the 
authors have maintained a real-world outlook 
on programming as a sociological, not just 
technical, exercise. Their concern for client, as 



well as programmer, is laudable. 

The Book of Rules states simply and concise- 
ly what the- authors feel is essential to the art/ 
science of programming. In terms reminiscent 
of old William Strunk, the authors exhort the 
reader to "Make sure all variables have dif- 
ferent names." 

"Avoid multiple, unconditional, jumps," 
they write. "Code carefully . . . write a refer- 
ence manual, . . . choose the right language 
for the job, . . . edit your program." 

Some of these canons border the obvious, 
others, seem trivial, but the solid footing of the 
author's opinions is undeniable. 

The layout of the book facilitates its use. 
Pairs of facing pages work together presenting 
rules of programming on the left, while right- 
hand pages provide examples and detailed 
discussion . 

Each chapter contains a summary of refer- 
ence material ranging from the academic (Soft- 
ware Engineering — An Advanced Course), to 
the esoteric (SIGPLAN Notices, vol. 9, no. 11). 
A bibliography and complete subject index are 
supplied, and the thoughtful inclusion of an 
Author Index further simplifies its organiza- 
tion. 

Shirt-Steeve Reference 

The book is well-produced. In this day of 
quick and dirty computer books, it is encourag- 
ing to see a carefully prepared edition that sells 
for a fair and reasonable price. 

The Programmers Book of Rules is a shirt- 
sleeve reference manual. Its appeal is universal 
and its authors pull no punches, mince no 
words in their presentation. If sound advice 
and definitive opinion is what you are looking 
for, you'll find it in The Programmers Book of 
Rules. And while your at it, pick up a copy of 
Strunk's book. You'll need it when you write 
your documentation. ■ 




TEM command. If your machine has a 32 or 
48K memory, BASIC-IP loads at the same lo- 
cation (decimal 28327) about 1 IK up from the 
bottom of RAM. This allows you 1 1264 bytes 
of usable RAM when in the Level I mode. 

BASIC-IP is compatible with most any 
printer and includes driver software. 

BASIC- IP documentation is excellent. The 
program executes automatically and asks you 
to select a printer interface option: RS-232-C, 
TRS 232, Centronics or no printer. Depend- 
ing on which option you select, you are asked 
for a few simple inputs (line feeds required?, 
nulls required?, baud rate?) that are appropri- 
ate for your interface. 

Now a READY appears on the screen, and 
the computer acts like a Level I UK machine 
in almost all respects. In addition, you can 
LLIST the program in Level I "language" 
which even Level II can't do! 

You can add LPRINT statements to your 
programs to have them appear on the printer, 
which Level I can't do. If you enter LPRINT- 
ON at the keyboard or in the program, all 
PRINT statements will appear on both the 
screen and printer until the computer encoun- 
ters an LPRINTOFF command from either 
the keyboard, or in the program. 

To return to Level II BASIC, type 
CMD"S". (Your Level I program will be 
lost.) The screen responds with MEMORY 
SIZE?. If you want to save BASIC-IP, type 
28327 and ENTER. This leaves you with 
1 1 1 30 usable bytes of RAM in Level II. To re- 
turn to BASIC- IP without reloading, type 
SYSTEM and press ENTER, followed by 
/28327 and ENTER. 

BASIC- IP comes with disk instructions as 
well. 

BASIC- IP is a marvelous, useful tape but it 
has a couple of limitations. Since it was de- 
signed as a resident interpreter in high RAM 
to act like a Level I BASIC ROM, it does not 
accomodate most Level I machine language 
programs. Some will load and run. If in 
doubt, CLOAD the tape and try. 

Other Level 1 machine language programs 
will "freeze" the keyboard. If this happens, 
push the keyboard reset button (left rear of 
keyboard unit) and you'll find yourself back 
in BASIC- IP. The very worst is that the 
machine language tape will bomb-out BASIC- 
IP, and you'll be back in Level II with the 
MEMORY SIZE? prompt. 

The other limitation is that Level I pro- 
grams exceeding 11264 bytes do not fit into 
the memory available when BASIC- IP is resi- 
dent. The entry point of BASIC-IP in RAM 
(decimal 28327) is not controlled by the user, 
but is programmed with the machine 
language. ■ 
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Maxi-Disk and Shuf neboard 
Parasitic Engineering 
Berkeley, CA 
Maxi-Disk: S995 
Shuffleboard: $249 

by Kevin Cohan 

Two products now available from Parasitic 
Engineering, Berkely, CA, add storage and 
CP/M capability to your 80. 

Adding Parasitic's Maxi-Disk gives the 
TRS-80 owner full size floppy drives that more 
than triple your storage capacity per drive. Fur- 
thermore, installing Parasitic's Shuffleboard in 
a Maxi-Disk system converts your TRS-80 into 
a true Z-80 CP/M with access to either system 
through a simple command. 

Using eight-inch floppies with a TRS-80 re- 
quires both hardware and software modifica- 
tions. Parasitic's S995 Maxi-Disk package has 
everything you'll need to make the alteration: 
one full-sized floppy drive, a small circuit 
board, an eight inch Maxi-DOS disk, contain- 
ing patches to enable TRSDOS 2.1, 2.2, 2.3 or 
NEWDOS to run with the new hardware. 

Installing the Maxi-Disk circuit board re- 
quires opening the expansion interface. This 
voids the official Radio Shack warranty, but it 
is worth it when you consider that after the in- 
stallation, you will have 256K of disk space on 
line with one Maxi-Disk drive, and that up to 
four may be installed. 

After opening the expansion interface, you 
need only unplug the disk controller chip. The 
Maxi-Disk board plugs directly into the socket 
in which the controller resided. Photographs 
included with the instructions show you the 
correct installation. That's it! 

With TRSDOS you have the option of com- 
bining 5'/«,and 8-inch drives in any order. For 
example, you may choose to have a mini drive 
as drive 00 to store programs and a Maxi drive 
as drive #1 to store associated data bases on 
full-sized floppies. For CPM all drives must be 
8-inch. 

Software Modification 

Software modification is next. Here you 
must patch the disk operating system (any 
TRSDOS or NEWDOS) so that it "knows" 
about the new hardware. 

To do this. Parasitic provides a disk program 
called DOSPATCH. Though the final configu- 
ration of drives is up to the user, to initialize the 
system, drive #0 must be a Maxi and drive #1 
must be a Mini. 

Running the DOSPATCH program gener- 
ates the Maxi-DOS system (drive #0) disk from 
your original system disk. After this is done, 
the drives may be reconnected in the chosen or- 
der and backups made of the new system disk. 

For an additional $249, you can obtain 
Parasitic's Shuffleboard. This device turns a 
Maxi-Disk TRS-80 system into a dual DOS 
computer incorporating TRSDOS and Z-80 
CP/M. CP/M is a disk operating system, used 
with eight-inch floppies. It is universally ap- 
plied and your programs will run on any other 



CP/M system. Consequently, more software 
has been written for the CP/M than any other 
system. 

To support CP/M, you need to install anoth- 
er small keyboard circuit, the Shuffleboard. 
Unplug the Z-80 CPU chip, plug the Shuffle- 
board into the CPU socket and plug the Z-80 
chip into the empty socket on the Shuffleboard. 

From now on, when the computer is used as 
a CP/M system, the CPU ignores the first 16K 
of memory space (except for the video RAM), 
regards the second 16K as the first, the third as 
the second and so on. 

You now have a true CP/M system, with a 
maximum memory space of 48K. True CP/M 
requires 256 bytes of RAM starting at location 
0000H, though the bulk of the DOS resides at 
the top of the memory space. 

These locations in low RAM contain critical 
I/O device information, as well as system entry 
vectors. Since the ROM in a TRS-80 occupies 
the first 12K of memory, those pseudo CP/M 
systems must locate this crucial system infor- 
mation somewhere else. Consequently, any at- 
tempt to run software which looks directly for 
the vectors in low RAM will cause a major 
crash. The Shuffleboard eliminates this prob- 
lem. 

Two modes are jumper selectable on the 
Shuffleboard. Mode A always boots the system 




into TRSDOS. CP/M is accessed by typing in 
the command CPM and inserting the CP/M 
system disk supplied with the Shuffleboard. 

Mode B is exactly the opposite. The system 
boots into CP/M, and TRSDOS is accessed by 
the command TRSDOS. Unfortunately, if a fa- 
tal crash occurs while in the DOS not selected 
by the jumper, the system disk must be re- 
moved and a reset performed with the other 
system disk. 

Your total investment to turn an ordinary 
TRS-80 into a Maxi-Disk TRS-80/ Z-80 CP/M 
system is $1244. The Maxi-Disk installation 
may be used alone, but it is the addition of 
Shuffleboard that makes this set-up valuable. 

If you are hesitant about spending this kind 
of money on your system consider that by add- 
ing this hardware to the TRS-80, not only is the 
disk storage capacity per drive tripled, but you 
also have access to an unrivaled new software 
realm. ■ 



Percom Disk Drives 
Percom Data, Inc. 
Garland. TX 
Disk Drive: $795 

by Walter C. June 

Most of you reading the microcomputer 
trade magazines are familiar with the 
name Percom Data Company, Inc. Their ad- 
vertisement probably appears in this issue. 

1 talked to other companies who offered 
drives at about the same price, but power sup- 
plies, enclosures and cables weren't included. 
Furthermore, none of the companies commit- 
ted themselves to delivery time. 

I called Percom twice before ordering my 
system. I couldn't believe how simply they 
packaged the system and called back to make 
sure I had not overlooked anything. Yes, they 
assured me, their systems included the drive(s), 
power supplies, enclosure, connecting cable 
and shipping. (Percom is now charging for ca- 
ble.) They promised delivery in six to eight 
weeks so I ordered a dual drive TFD-100 sys- 
tem. 

On the seventh week the cases arrived. For 
my system they shipped two WANGCO model 
82 drives, although you might also receive 
Pertec FD-200 drives. Both drives support 
40-track operation and have dual sense lamps 
so you can record on both sides of your disk- 
ettes without having to punch extra holes in the 
jackets. 

The drives are packed separately in their own 
protective cartons and some assembly is re- 



quired. The instructions make assembly a snap. 
First you determine which drive you will use as 
DRIVE and remove the terminating resistor 
from the other drives. Then you mount the 
drives into the enclosure with the machine 
screws provided and plug in the lead from the 
power supply. Plug in the connecting cable and 
replace the top of the enclosure. In fifteen 
minutes you're done. 

From my ignorance of floppy disks and how 
they worked I had this fear in the back of my 
mind that buying a 40 track drive while Radio 
Shack used 35 track drives would make my sys- 
tem incompatible. Percom assured me there 
was no problem but I didn't believe them until I 
placed my Radio Shack DOS 2. 1 diskette into 
my new DRIVE and booted the system. It 
came up the first time without a hitch and I felt 
much better. The five extra tracks on my Per- 
com are additional ones that Radio Shack 
drives are not physically able to reach. The 
standard DOS doesn't even know they exist. 

But why give up that extra fourteen percent 
capacity on each drive? 

You don't. 

Percom sends their PATCHPAK diskette 
with each system which tells DOS how to han- 
dle 40 track drives. This PATCHPAK requires 
two drives to run, but once updated DOS han- 
dles 40 track drives just as well as it did the 35 
track drives. 

Though Percom now charges for their con- 
nection cable, for $24. 95-$39.95— depending 
on the number of drives— I recommend it to 
complement, as near as I can tell, the perfect 
system. ■ 
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THE ASSEMBLY LINE 



by William Barden, Jr. 



Relocatability is 

a main ingredient for 

constructing assembly 

language routines . . . in 

BASIC programs. 



n this month's column we're going to discuss 
two interesting topics: "relocatability" of 
Z-80 instructions and programs; and a way to 
read the TRS-80 Model I keyboard. 

Relocatability is a main ingredient for con- 
structing assembly language routines that can 
be embedded in BASIC programs. The second 
subject will let us read every key with a fairly 
simple assembly language routine. 

Are You Free to Relocate? 

Relocatability is one of those mysterious 
Z-80 buzz words that everybody uses. When 
used to describe assembly language code, relo- 
catability simply means a given instruction will 
execute properly anywhere in memory. To ex- 
amine this idea, you'll need to know something 
about instruction formats. Pick up that copy of 
TRS-80 Assembly-Language Programming 
and do some rereading. I'll wait .... 

Z-80 instructions have many formats. Some 
are only one-byte long specifying a simple ac- 
tion, such as setting the carry flag (SCF) or 
complementing the A register (CPL). These in- 
structions contain no address fields or other 
operands. They execute anywhere in memory. 

Another type of instruction uses a field, or 
fields, within the instruction to define a CPU 
register or register pair. An example of this type 
of register addressing is a LD A,C which uses a 
field for the source register (C) and destination 
register (A). This type of instruction also exe- 
cutes anywhere in memory. 

Another common type of addressing is im- 
mediate addressing, in which the data is imme- 
diate within the instruction itself. Since the data 
is constant data, the instruction appears the 



same anywhere in ROM or RAM. The instruc- 
tions LD A.23 and LD HL.3C00H are exam- 
ples of immediate addressing. 

There is no problem when any of the register 
pairs or index registers are used to point to a 
memory location. An ADD A,(HL) or LD 
A, (IX + 5) has the same appearance whether it 
is loaded at location 25 or 2500. 

But some instructions do change when load- 
ed into different areas of memory. In general, 
any instruction that specifies a memory address 
where the operand for the instruction is located 
does change. 

If we were to load a variable into the A regis- 
ter, for example, we might have the instruction 
LD A,(40EEH) or LD A.(VARP). The second 
and third bytes of the LD would specify a 
memory address. When this memory address 
remains constant, there is no problem. 

For example, we could load variables into 
the A register by LD A,(40EEH) instructions 
anywhere in memory. 

A Variable within the Program 

A problem develops, however, when the 
variable to be used was located within our own 
program. Suppose that we use the code shown 
in Program Listing 1 . 





ORO 


mm 


;ORICIN 


SIARr 


LD 


A.(VARI) 


:LOAD VARIABLE 




CAI.I 


SUBS 


;CAI 1 CONVhRSION 




JP 


NEXT 


;GOON 


VAR1 


DfcfB 


23 


.HOIDSCL'RRFNT «ol 
IRSSX IN YUMA 






Program Listing I. 



(9000 21003C 


00100 


LD 


HL.3C00H : START OF SCREEN 


0003 3EBF 


001 10 LOOP 


LO 


A.0BFH i GRAPHICS ALL- ON 


0005 77 




00 1 20 


LD 


(HLMA JWHITE OUT ONE CHARACTER 


0006 23 




00130 


INC 


HL ! POINT TO NEXT 


0007 7C 




00140 


LD 


A.H 5GET MS BYTE OF ADDRESS 


0008 FE40 


00150 


CP 


40H ITEST FOB END 


000A 20F7 


00160 


JR 


NZ.LOOP :SO IF NOT END 


000C C9 




00170 


RET 


iRFTURN TO BASIC 


0000 




00180 


END 




00000 " 


:>tal 


ERRORS 






100 


REM 


THIS IS A SAMPLE 


CALL 


TO THE WHITE OUT SUBROUTINE. 


1 10 


REM 


THE ASSFMPLY -LANGUAGE 


SUBROUTINE IS RELOCATABLE AND 


120 


REM 


IN DUMMY STRING 


At. 




130 


A»=CHR*'33)-»CE-R*!B>*CHR*(60)-tCHR«<62>*CHR«( 1 '1 1 )*-CHR«( 1 !S>) + CHR*< 35 1 




+ CHR« ( 1 24 ) +CHR» ( 254 ) +CHR« ( 6 A ) i CNR* ( 32 > *CHR$ ( 247 ) +CHR« ( 201 ) 


140 


B=VARPTR(AS) 






150 


POKE 


16526. PEEK (B+l > 






160 


POKE 


165 27. PEE MB+2 






170 


C=USR(0) 






180 


aoTt 


1H0 












Program Listing 2. 



When we assemble this code (which is in- 
complete), the LD A,(VAR1) is assembled as 
3AH (operation code for LD A) in the first byte 
and the address value for VAR1 in bytes 2 and 
3. In this case, the address of VAR1 would be at 
location 8009H as the LD, CALL, and JP in- 
structions each take three bytes. 

This code runs only at the 8000H area. If it 
were relocated anywhere else, the LD 
A,(VAR1) would attempt to load VAR1 from 
8009H, instead of nine bytes from the start of 
the new area! 

An equivalent condition would exist for JP 
(Jump) instructions, where the jump address is 
in bytes 2 and 3 of the instruction, and for 
CALLs. The same problem would also be pre- 
sent for an immediate instruction, such as LD 
HL, TABLE, specifying an address of a vari- 
able (rather than a constant). 

Any time that an instruction specifies a direct 
memory address that refers to a location not 
fixed in memory, the instruction cannot be re- 
located and executed. Instructions that are not 
relocatable are: conditional and unconditional 
JPs; CALLs; loads that use a direct address; 
and immediate loads that specify a variable ad- 
dress. 

JR (Jump Relative) jumps are relocatable 
because they do not specify a direct memory 
address, but a displacement value that is 
referenced to the current location of the in- 
struction. This means that any subroutine that 
contains nonrelocatable instructions cannot be 
used as embedded assembly code in BASIC 
programs. 

The reason for this, of course, is that we 
generally don't know in advance where the 
dummy string for BASIC will reside. If we did, 
we could ORG (Origin) the assembly code for 
that spot. But, the string may be in various 
places dependent upon other strings and 
BASIC statements. 

Without first reassembling a new Origin we 
cannot move assembly code ORGed at one area 
into another if the code contains instructions 
with direct addresses. 

It is possible to make a completely relocat- 
able assembly language subroutine for use in 
BASIC dummy strings or SYSTEM type opera- 
tions, as long as JRs are used in place of JPs. 
No CALLs to areas within the subroutine can 
be used, nor variables within the program. An 
example is shown in Program Listing 2 in a sub- 
routine that whites out the screen. It is embed- 
ded in Level 1 1 BASIC as a dummy string by the 
useofCHRS. 

Automated Relocation 

It's possible to relocate code automatically. 
Continue to next page 
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This technique, used on larger systems, assem- 
bles a machine program and the object code is 
output to disk. The object code in this case con- 
tains not only the machine language form of 
the instructions, but also information relating 
to the origin, relocatability or absoluteness of 
the instructions and data and other load items. 

The object code by means of a special loader 
examines each load item and loads the data as- 
sociated with it. If the data is specified as relo- 
catable, such as a JP or CALL instruction, a 
load bias is added to the direct address portion 
of the instruction. This produces the proper ad- 
dress in memory where the instructions are to 
be loaded. The job of relocating the machine 
code, then, is done by the loader. The assembly 
program does not have to be reassembled for 
each new memory area where it is to execute. 

Can we relocate existing machine language 
code that has no source listing? Yes, but the 
process is tedious. 



// is possible to make 

a completely relocatable 

assembly language 

subroutine for use in 

BA SIC Dummy strings . . . 



First, the code must be disassembled by a dis- 
assembler such as Small System Software's 
RSM series or Apparat's DISASSEM. Then, 
all JPs, CALLs and loads with references to 
variables in locations that are not fixed must be 
changed. These references must be given ad- 
dresses corresponding to the locations for the 
new area. It's easy to make a mistake while do- 
ing this. Also, it is not easy to determine which 
references to variables are to fixed locations 
and which are to locations that will be relocated 
to new areas. 

An alternative method is to reenter the 
source code, based on the disassembled listing, 
with the original ORG to see if it assembles to 
the original machine code. Then, reassemble 
with a new origin. 

Project Number 2 

Learning to play the TRS-80 Model I key- 
board is a great deal less demanding than play- 
ing Bach or Garner on 88 keys. First of all, we 
have only 53 keys (count 'em), not including the 
numeric keypad on some of your systems. All 
of these keys are active keys and generate a 
signal. In fact, the keyboard forms a matrix (ar- 
ray) as shown in Fig. 1 . The matrix has eight 
rows and eight columns. Associated with each 
row is a row address of hexadecimal: 3801, 
3802, 3804, 3808, 3810, 3820, 3840. and 3880. 

To address a row, a Z-80 LD instruction with 

a row address is executed. The LD instruction 

Continue to next page 
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will return a single byte into the A register in the 
7.-80. In this case the keyboard is treated as a 
series of memory locations. 

Only one row at a time can be addressed. 
One LD instruction is required for each row . 

If no key is pressed, the byte contains all 
zeros; if one or more keys are pressed, there is 
a one-bit in every bit position corresponding 
to the column for the keypress. 

As an example, if the f/3 key is pressed, a 
00001000 is read into the A register when an LD 
A,(3810H) instruction is executed. 

Sounds simple, doesn't it? To detect a key 
press, all one must do is to execute eight LDs, 
one for each row, and look for a zero bit. If 
none is found, the eight IDs are executed 
again. If a zero bit is found, a conversion is 
made to the proper ASCII character for the 



key has been pushed, a zero is returned in A. 

READKB is divided into five parts, scan- 
ning, conversion, table lookup, debounce, and 
the lookup table itself. 

Scanning is done by reading in the first seven 
row values and looking for a zero in any bit. 
(CPL changes all ones to zeros and all zeros to 
ones in a "one's complement.") The keyboard 
address of 3801 H. 3802H and so forth, is held 
in the HI. register pair. A new address is obtain- 
ed by shifting the I. register left one bit at a 
time. For example, 02 shifted left yields 04. The 
contents of H remains constant at 38H. 

When the L register contains 80H (address 
3880H), all rows have been scanned and a is 
returned in A. The M(inus) flag will be set 
directly after the SLA to 3880H. 

The next section converts the row value and 



Learning to play the TRS-80 Model I 
keyboard is a great deal less demanding 
than playing Bach or Garner on 88 
keys. First of all, we have only 53 keys . . 



row and column. 

As some of us know from early battles with 
the keyboard, there are other subtleties involv- 
ed here. First, there's the conversion to ASCII. 
The Level 1 1 BASIC interptelcr uses a some- 
what convoluted approach 10 this conversion 
by checking ranges, subtracting tricky factors 
and doing table lookups for special characters. 
We will take the more straightforward ap- 
proach of doing a direct table reference, though 
it requires more memory. That way we can re- 
define the keys as required from ASCII to any 
other functions we desire. 

Secondly, there's that infamous debounce 
problem. Level II has n-key rollover, which 
allows another key to be pressed while the first 
is being held. We'll use 0-key rollover and 
eliminate some of the debounce problem. 

The process of debouncing simply means 
that the scan is performed long enough to catch 
the key press but not rapidly enough to detect 
an erroneous bounce on either make or break. 
As soon as a zero is detected, a time delay is 
performed that provides a reasonable amount 
of time for the key to be held and released. 
Typically this would be 20 to 40 milliseconds 
(20 to 40 thousandths of a second). 

Now it appears we have all the elements for 
reading the keyboard. Let's put them together 
in a subroutine called, reasonably enough, 
READKB. The subroutine appears in Program 
Listing 3. 

The subroutine will return an ASCII value 
(or whatever you put in table KBTAB) for the 
corresponding key. The subroutine does not 
wait until a key is pushed before returning. The 
.ASCII value is returned in the A register. If no 



column value to a value of 0-55 by finding 
ROW«8 + COL. This index value can then be 
used to look up a unique value for each row, 
column address. We have two problems here: 
How do wc multiply ROW»8; and how do we 
convert the input byte in A to a column value of 
0-7? 

Finding ROW»8 is done by taking the partial 
row address in L (01 H. 02H. 04H. etc.) and 
shifting it right until the C(arry) bit is set. For 
each shift, 8 is added to the A register. The 
result is ROW«8. The top row, of course, is row 
0. We now have a value of 0. 8, 16, 24, 32. 40, 
or 48 in the A register. Adding the bit position 
of the column bit will give us a value of 0-55. 

First, though, we must convert the column 
bit position to a value of 0-7. We do this by 
shifting out the input byte until a one appears 
to set the carry out of the left hand side of the 
C register. For each shift a count in the B reg- 
ister is incremented. At the end, the column 
value is added to ROW»8 in C to give us 
ROW.8 + COL, a value of 0-55. 

We did not scan the SHIFT row in the scan- 
ning section for a good reason. We now have a 
unique (row, column) value in C. Since each 
key may be upper or lowercase, however, we 
must convert the 0-55 value to 0-1 10, represent- 
ing codes for both upper and lowercase, based 
on the SHIFT key. 

First, we read in the SHIFT key by LD 
A,(3880H). Complementing this value and 
shifting right two bit positions gives 0X000000, 
where X is a zero, if the SHIFT key is not 
pressed and a one. if the SHIFT key is pressed. 
This value is then added to the row, column 
value in C to give a value of 0-1 19. There are 



numerous "gaps" in this range representing 
impossible combinations, but memory is 
cheap! 

The next part of READKB finds the table en- 
try corresponding to the (row, column, SHIFT 
key) value. The hash value is added to the ad- 
dress of the lookup table KBTAB to point to 
the unique value for the key. The value is then 
loaded into the A register. 

Next, a debounce delay of 35 milliseconds is 
performed. The carry flag is reset after ADD 
HL.BC, if the result is minus. We use this tech- 
nique to decrement a delay count in HL. The 
delay count can be changed by the reader for 
experiments in various debounce delays. 

Upper and Lowercase Keys 

The lookup table can provide a unique value 
for upper and lowercase keys, including: 
SHIFT, up arrow; SHIFT, right arrow; and 
others. The values for Level II and Disk BASIC 
compatibility are given in Table 1 . These can be 
added to the source code by DEFBs that replace 
the 1 5 DEFS pseudo-ops. (Each DEFS reserves 
8 bytes of storage.) Any other values may be 
defined for the keys. For example, special com- 
munications or word processing control char- 
acters can replace selected key values. 

There is an easier way to obtain a keyboard 
value. We can utilize the built-in subroutine in 
Level II ROM at location 03E3H. This is the 
keyboard driver routine. A word of warning, 
however. This driver is replaced by another 
driver in TRSDOS or other programs to elimi- 
nate debounce problems. 

To use any of the drivers, find which one is in 
use by examining the keyboard DCB (data con- 
trol block). The address of the keyboard driver 
in use is at locations 401 6H and40l7H (16406 
and 16407) in reverse Z-80 address format (least 
significant byte of address followed by most 
significant). Use this address and perform a 
CALL to the driver. On return, the A register 
w ill contain a zero if no key has been pushed, or 
the ASCII-like value if a key has been pushed. 
If a key has been pushed, n-key rollover and de- 
bounce are also performed. 

Next month we'll examine some techniques 
of assembly language high speed graphics. In 
the meantime, try as much assembly language 
coding as possible, and remember, Radio 
Shack's computer stores are now stocking tran- 
quilizers for assembly language programmers 
(part #Z80-OHNO).B 
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Instant Software: 
BASIC Sophistication 



Join the Disk Revolution! 

Instant Software has revolution- 
ized TRS-80 business programs by 
introducing the speed and conve- 
nience of disk software. Here are 
two no-nonsense packages that 
will do your work rapidly and effi- 
ciently. 

Our Energy Audit package is de- 
signed to save you money on 
home heating expenses. It will 
analyze your home and make 
specific recommendations for 
your insulation needs. 

Our Accounts Receivable/Ac- 
counts Payable package is a ver- 
satile, easy-to-use business sys- 
tem. KB/Microcomputing maga- 
zine uses this system for all of its 
dealer book sales. It will soon be 
augmented by more business pro- 
grams from the same author. 

So stop going around in circles, 
take our disk software out for a 
spin. You won't be sorry. 




When it comes to spending money for energy to heat a home, everybody's 
a "skinflint." With today's rising fuel prices and staggering inflation, you 
need ways not only to cut down on your home heating bills but also to con- 
serve our diminishing energy supplies. 

One of the best ways to invest your money is to insulate your home. You'll 
save money, and your home will appreciate in value. But, you're asking your- 
self, "How do I start, where should I insulate, and what will it cost me?" The 
Energy Audit package can answer all these questions and more. 

The programs in this package will give you detailed instructions on how to 
examine your home, collect information on its structural components and 
layout, and create a data file. The program will then analyze this data, show 
where you're losing money because of excessive heat loss, and describe the 
most cost-effective methods for saving energy and money. 

You may select any area of your home for detailed scrutiny, input your 
own cost figures, calculate savings potentials for different options, and 
incorporate whichever you want into your own home-investment budget. In 
effect, you can create a computerized "model" of your home. You'll be able 
to see the changes that will be made in your energy budget as a result of ad- 
ding a wood stove or refinishing an attic. 

When your friends and neighbors see how much money you're saving, 
they will want their homes analyzed too. You could even start your own busi- 
ness, showing your customers exactly where and how to insulate their 
homes for maximum savings. The Energy Audit package is the perfect sell- 
ing tool for any contractor or building supplies dealer. 

With the Energy Audit package you'll know what your home needs, where 
it needs it, and how much it will cost you. 

Or maybe you enjoy paying utility bills? 
Pkg. 00891 (cassette version) $49.95. 
Pkg. 0052RD (disk-based version) $75.00. 



Accounts receivable/ 
accounts payable 



/ ENERGY AUDIT \ 




Now, in one package, you can have a complete Accounts 
Receivable/Accounts Payable (AR/AP) system! These pro- 
grams will handle all the drudgery involved in processing 
AR/AP entries. 

Each program is capable of handling up to 760 accounts and 
as many as 1500 entries per month. Should you need to handle 
more accounts, you can divide them into as many sub-groups 
as necessary and keep a set of data disks for each sub-group. 

The Accounts Receivable program can print invoices, state- 
ments, and address labels for each customer. It will also 
generate a Month End report, a Customer Activity report, and a 
Daily Sales report. 

The Accounts Payable program will generate a Month End 
report, an Account report, a Daily Activity report and a Check 
Payment report. 

The AR/AP package is ideal for any small business. The pro- 
grams are self-prompting and are easily used by anyone famil- 



iar with AR/AP operations. 

These programs can save you money, because they can print 
your company's letterhead at the top of each invoice and state- 
ment, using plain, fan-folded paper. 

Accounts Receivable/Accounts Payable: Software for the 
Professional. 

THIS PACKAGE REQUIRES THE FOLLOWING MINIMUM 
SYSTEM 

1. A TRS-80 Level II microcomputer, 16K of memory. 

2. An Expansion Interface with at least 16K of additional 
memory. 

3. Three mini-disk drives. 

4. A pin-feed line printer. 

5. Any TRS-80 Disk Operating System. 



Ask for Package 0075RD 



$199.95. 






Instant Software Inc 



Prices subject to change without notice. 

Peterborough, New Hampshire 03458 603-924-7296 



• Reader Service — see page 162 
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Instant Software New Releases 




GOLF/ 
CROSS- 
OUT 



Why wait for good weather? With 
the Golf/Cross-Out package you have 
11 clubs and a putter with which to 
play the finest (electronic) golf course 
in the country. The Golf program is al- 
most the real thing. It includes sand 
traps, water hazards, roughs and put- 
ting greens. It even includes variable 
wind factors which must be taken into 
consideration if you want to score in 
the low 70' s. 

You can play the standard 18 holes 
in the program, or design your own 
championship course. Simple instruc- 
tions are included that let you design 
fairways, relocate greens and place 
water hazards where you want them. 

The Crossout program is the old fa- 
vorite peg puzzle game in a new com- 
puterized form. You play the game by 
jumping a peg over another into an em- 
pty square. The object is to leave one 
peg on the board in the center square. 
It sounds easy, but it's not. 
Order No. 0009R $7.95. 




''•^BALI- 
TURRET 
GUNNER 

For years the Petro Resource Conglom- 
erate has attacked our photon collection sta- 
tions and strangled our deep-space trade 
routes. The PRC's Exxonerators Class light 
fighters (code name: Gnat) have been their 
main weapon. Now you can strike back, by 
joining the Ball Turret Gunner Service. 

Imagine yourself at the control console of 
the LW-1417 Stratoblazer (Type B Strategic 
Laser Weapon). Your Hindsight Director in- 
forms you that a Gnat fighter is coming in for 
an attack. You position your gigawatt laser 
turret until you can see the target on your 
monitor. The Range Indicator shows he's 
coming in fast. You center your target sights 
on his location. The Targeting Computer 




studies his course and speed as your finger 
tenses over the firing key. You know you'll 
have only a fraction of a second in which to 
react. The Gnat fighter's evasive maneuvers 
cause him to dance in your sights. Suddenly 
you see the fire command, and you instinc- 
tively react. Your Stratoblazer's laser beam 
lashes out and reduces the Gnat fighter to an 
expanding ball of ionized gas. Mission ac- 
complished. 

Ball Turret Gunner, with your choice of 
multiple levels of difficulty, optional sound 
effects programming, and superb graphics, 
is more than just a game. It's an adventure. 
Experience it! 
Order No. 0051 R $9.95 



Level I Notice 



Dear Customer, 

Due to the decreased demand for pro- 
grams for the TRS-80 Level I, Instant 
Software had decided to discontinue the 
production of Level I program packages. 
We still have a quantity of Level I 
packages in stock which we will sell un- 
til our inventory is depleted. No orders 
for Level I packages will be accepted 
after July 1,1980. 

Packages that contain both Level I 
and II programs will continue to be 
marketed. 



SEE 
INSIDE BACK COVER 

FOR LIST OF 
DEALERS NEAR YOU. 

Look for Instant Software at a store near you. If the 
ore nearest you does not stock Instant Software. 

use this order blank to purchase your software 
rectly or call Toil-Free 1-800-258-5473. 



Name 



For a free catalog listing over 200 programs 
write: Instant Software Catalog Dept., 
Peterborough, N.H. 03458. 

Prices subject to change without notice. 



MIMIC 

A fast-action memory game. 

In Mimic, players are shown a sequence 
of graphic characters that appear in ran- 
dom locations within a 3x3 grid. You'll 
have to remember the order and location in 
which the characters were shown, and 
"mimic" that sequence on your keyboard. 

With several levels of skill, it's not hard to 
see why people of all ages enjoy this exer- 
cise of concentration and dexterity. 

TRS-80 Level 1 1 1 6K, Order No. 0066R $7.95 



Address 
City 



State. 



.Zip. 



D Check 
D VISA 
Card No. 



D Money order 
P AMEX D Master Charge 



Expiration Date. 



Signed. 



Date 



Order your Instant Software today! 



Quantity 


Order No. 


Unit Cost 


Total Cost 










































Handling 


$1.00 


Total Order 





L. 



Instant Software Inc. dept 70eo 

Peterborough, N.H. 03456 USA 



Instant Software Inc 



Peterborough, New Hampshire 03458 603-924-7296 
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TRS-80* OWNERS: 

• Let the computer write your "Basic" programs for you! 

• Draw Pictures, animated figures, data forms! 

• Create a library of displays! 

• Produce "Commercial" grade software! 




The Magic Cursor is a Revolutionary Family of Products which 
provides a dramatic new method of reproducing drawings and 
displays that you create on your screen. It makes both simple 
displays and complex interactive data input forms. It stores a "BASIC 
PROGRAM" on disk (or tape) ready for you to execute alone or as a 
subroutine. It produces screens in both standard and wide screen. 

It is available for any level 2, 16K or larger system with tape or disk. 
An optional version is now available which creates an assembly 
language program. 

Be sure to pick out the system that fits your present needs and 
order it today. You may upgrade your original copy by paying the 
difference and a moderate service charge. 



MAGIC CURSOR PROGRAMS 



THE BABY CURSOR allows you to easily create screens (including 
graphics) on your video. A powerful command then generates the 
BASIC instructions to recreate the screen. For the first time, a 
program for automatic generation of video display forms. (16K Tape 
or 16K Disk) $24.95 

THE MAGIC CURSOR (additionally makes sophisticated Data Entry 
and Display easy. With Magic Cursor I you define the Data Entry or 
Display fields directly on your screen. The definition commands 
generate the BASIC instructions to implement the Data Entry and 
Display. The Magic Cursor I has commands which move, center and 
duplicate blocks of graphical or alpha/numeric displays. You can 
even justify text. (16K Tape Only) $79.95 

THE MAGIC CURSOR II adds the power to write animated games 
easily in BASIC. The Magic Cursor II allows you to reload previous 
screens either from memory or from Disk. You can then modify them 
and store either the modified screen or only the changes. (32K Disk 
Only) $99.95 

THE MAGIC CURSOR III will be available soon for the new Model II 
Computer (32K One or more Disks) $149.95 

THE MAGIC CURSOR IV provides the features of Magic Cursor II 
but stores an assembly language program. (32K Disk 
Only) $99.95 



Call 713/474-2428 or order by mail Master Charge, Visa, Certified Check or Money Order 
accepted Personal Checks require 14 days to clear C O.D or collect calls not accepted. 
Software Guaranteed for replacement only. Prices subiect to change without notice Programs 
supplied on cassette tape For disk versions, the cassette supplied will automatically create a 
disk file. 



'Trademark of Radio Shack, a Tandy Co. 



Beginner * 

** * * * 

__* Home * 
+ Animated p ro grammer 
Games # * 

Writer * * 

^Assembly * 
Language ^ 
programmer 

* ""^" * * * * 

* Commercial ^ * 
* Software ^ ^ + 

* Houses 

OTHER PROGRAMS WRITTEN 
BYCCC 

GENERAL LEDGER. Accounts Payable. Accounts Receivable, 
etc. - We are an official Osborne/McGraw Hill conversion co. 

RESTAURANT MANAGEMENT - Cost analysis, inventory 
control, recipe design, labor scheduling, etc. for both fast food 
and traditional restaurants. 

INSURANCE RATING - Instant pricing for policy premiums 
based on age, marital status, etc. for both Texas and National. 

SMALL BUSINESS MANAGEMENT - From our library of custom 
design for DIAMOND & JEWELRY MERCHANTS. DONUT 
SHOPS, SAILBOAT SAIL SHOPS. CONSTRUCTION FIRMS, 
ENGINEERING FIRMS. MANUFACTURING FIRMS - in the areas 
of cost analysis, product design, inventory control, product 
pricing sheets, purchase order, invoicing, etc. 

PROGRAMMER UTILITIES for supporting assembly language 
programming and disk modification. 

MAGIC MEMORY - personal inventory programs for stamp 
collection, coin collectors, personal libraries, etc. 

WRITE FOR OUR COMPLETE 
SOFTWARE CATALOGII 

^■^^k Send Check or Money Order payable 

£mw CUSTOM 

V COMPUTER 
CENTER, INC. 




ATTN: Jim Martens 
P.O. BOX 58042 
HOUSTON. TEXAS 77058 
or call: 713/474-2428 X"^ 



'Reader Service - see page 162 
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tf? APPLICATIONS 

^^ ^^ hv Dennis KitS7 



by Dennis Kitsz 



The most difficult part is deciding to 
begin. Really. And, I must reveal, the im- 
petus for me was strictly economic. 

In January's column, I spoke in less than 
rhapsodic terms of my music synthesizer. It has 
in fact served me well, for if it hadn't been for 
the shock of a $100 repair bill, electronics 
would have remained for me an immutably un- 
decipherable code. But, there came a next time, 
and another synthesizer failure, so. with 
frugality aroused, I vivisected my music 
machine — and stopped face-to-chip with inte- 
grated circuits. Eventually, 1 learned that 
although electronics is made up of equal parts 
skill and knowledge, the greatest requisite is a 
fool's courage. 
So join me. 

Radio Shack Boards 

First, we recall the arrangement of pin 
numbers of a standard dual-inline package 
(DIP): 
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o K-J 


14 
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The circuits suggested last month have from 14 
to 20 pins, but the numbering always begins at 
the upper left near a notch or dot (or both), 
proceeding down one side and up the next. 

There are two ways to construct this circuit. 
The first is to obtain a prototyping board, 
available by mail or from Radio Shack (Cat. 
No. 276-174). You'll need two if you use this 
board. The other method is to assemble the 
final, soldered version. Again, there's a Radio 
Shack board (276-170). 

Being impatient, 1 invariably use this ap- 
proach when building published and debugged 
circuits. 

Notice in Photo 2 that 1 have soldered the 
IC's to the foil side of the board, an unusual 

Continue to next page 




Photo 1. Prototype board version of I/O latch. LEDs to the right are part of my testing routine. 



Photo 2. Before and after versions of the I/O latch project. 



Pkolot bt Itonnct Rilu 
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practice. With many wires on the breadboard, 
though, this method is easier for the eyes to 
follow, and has no effect on the operation of 
the device. 

Fit each part onto the board, soldering it 
carefully in place. Insert short lengths of wire 
connecting the IC power pins to the supply 
voltage (the vertical bus to the right is conve- 
nient) and ground (the left bus). Notice that the 
power pin arrangement is similar for all circuits 
but the 74LS75. Also connect any other pins to 
ground as indicated in the schematic. Cut and 
gently strip the ends of wire lengths, and run 
them as shown in the circuit diagram. 

Work slowly and always keep the board 
oriented, so you know the order of the IC pins. 
Particularly if this is your first experience with 
digital hardware, work for short periods and 
double-check similar groups of wires. Note that 
some input, for example, is arranged in groups 
(74LS30), while others alternate (81LS95). Be 
sure also to connect together the three points 
marked "A." 

The most tedious job is to separate, strip and 
solder the wires from the 40-contact edge con- 
nector. Use a razor blade or Exact-o knife to 
separate the leads for about 1 Vi inches; strip a 
small amount of insulation from each. Careful- 
ly examine the TRS-80 edge card diagram 
below: 



The connector is a mirror image of this. Iden- 
tify which lead matches which connection 
point, as the leftmost wire may be #2! Cut small 
bits of mailing labels or white tape, number 1 to 
40, and wrap one around the end of each wire. 
Refer again to the schematic diagram, and 
solder each wire in place. Solder the remaining 
leads to separate, unused terminals on your 
board, or snip off the bare ends. 

On the schematic, the outputs of Z2 and the 
inputs of Z7 remain unconnected until we 
determine which output port we wish to use. 
Since last month we used the example 178 
(binary 1011 0010), temporarily (but securely) 
run connectons between the following pins: 
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Mount the boards on standoffs or wooden 
Continue to next page 



Photo 3. One section of soldered 

breadboard version, containing 

(from top) Z7, Z8, Z3, Z5, Z6. ICs are 

placed on the foil side for 

ease in routing wires. 
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CAPTAIN $9 

hv Rnh I iddil %^ ^^ 



by Bob Liddil 



The real culprit 

in the demise of the 

small software vendor 

is none other than 

the end user. 



Here's the Captain, kicking back after a 
hard clay's work in the old salt mine. My 
new disguise, that of Joe Independent Software 
Producer lies in disarray on the couch. 

I thought it was easy to run a software com- 
pany. It seemed simple enough. Acquire the 
rights to a couple of good programs, get a few 
stores to sell and promote your software and 
POOF! Enter The Captain Eighty Software 
Exchange. 

Wrong Number 

Boy, did I get a wrong number. The most 
common reason (Those who've been there will 
tell you.) for the failure of software companies 
is not poor programs, but poor judgement. 
More than one distributor that I have dealt with 
over the last 90 days has teetered on the brink of 
extinction because of the thoughtlessness of 
computer stores who do not pay their bills on 
time. The software may still be sitting on the 
shelf or not. Thirty days pass and, still, no 
check arrives. 

Meanwhile, the bills at the software com- 
pany pile up, setting up yet another chain reac- 
tion in which the poor author does not see a 
check for months at a time. 

The real culprit in the demise of the small 
software vendor is none other than the end 
user. No, not the guy who shelled out $14.95 
for a copy of Scott Adams Adventure, but the 
IS others who accepted bootleg copies, then 
proceeded to enjoy the program, as if they'd 
paid the price to play! 

Who Me? A Software Pirate? 

Who among us hasn't at one time accepted a 
backup copy of a favorite program from a 
friend? It is second nature to want to slide by on 
as little dollar investment as possible. But mul- 
tiply 15 bottleg copies by 1,000 purchasers of 
NEWDOS at a conservative S50 price and sud- 
denly the loss is a staggering: $750,000! That is 
the loss to one vendor and on one program. 

Multiply that figure by the thousands and 
thousands of backed-up bootlegged programs 
and you'll need a computer and a good math 
program, if you can find one, to calculate the 
damage. 

Sadly, most people see no wrong in duplicat- 
ing programs, modifying them to suit their 
taste and distributing copies among their 
friends. 

Case in Point 

I recently helped a friend market a program . 
It was an adventure, written in BASIC. Lucki- 
ly, for me and my author, there was a chain of 



computer stores in Boston with a buyer that lik- 
ed the cut of the program. 

A couple of weeks went by, and I was anx- 
ious to learn how the program had been re- 
ceived. I discovered that Danny Debug, a local 
computerist, had bought the adventure at his 
friendly neighborhood computer store. He did 
not particularly like the opening display (title 
page) or the tape and disk save routines (you 
know, "SAVE GAME"). So he deleted them 
from the program. 

Now this, alone was no big deal. Danny De- 
bug has the right to rip apart any program that 
he buys. But the story didn't end there. Once 
the program was altered to suit its new owner, it 
was returned to the computer store where the 
virtues of the new improved copy were extolled. 

No, Mr. Debug didn't offer to SELL the new 
version. He GAVE IT AWAY. First, he gave a 
copy to the manager of the computer store, 
then, who knows? Without a doubt the pro- 
gram, in its new format would travel to a users' 
group where copies would be enthusiastically 
scarfed up by software hungry people who 
wouldn't think of stealing. 



Out of Games 

Noted computer author Lance Miklus, 
whose Mean Checkers Machine and Star Trek 
programs have given me many countless hours 
of enjoyment, said that he was forced out of the 
game market by pirates. Mr. and Mrs. Joe 
Average who duplicate tapes for their friends 
and accept the same have robbed the market- 
place of one of its most skilled and imaginative 
game writers. 

I know a guy, named Paul, who staunchly re- 
fuses to accept anything but a labeled, original 
copy of software. I have seen him turn down 
some fine programs because of his principals. I 
have even joined in the ribbing he took each 
time he stuck up for what he believes in. 

Suddenly, it isn't funny anymore. The shoe 
is on the other foot, now that I've tried to help a 
friend. Paul has had the right idea all along. 
It'll just take the rest of us a little while to catch 
up. 

I asked the question in a recent column. 
"Where are all the high quality game and 
educational programs?" Now I know. ■ 
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strips, and run wires to your 5-volt power sup- 
ply. These circuits demand ±5 percent ac- 
curacy, so don't substitute a spare 6- volt bat- 
tery eliminator! Without attaching the cable to 
the TRS-80, apply power to the board. If you 
have a meter, check for a current draw of about 
130 mA; IC temperature should rise just above 
room level. 

Connect to 80 

Remove power from both the computer and 
your input-output (I/O) board, orient the cable 
carefully, and connect it to the TRS-80. Restore 
power to the computer, quickly run through 
MEMORY SIZE? to READY, and try a few 
commands. 

If at any point the TRS-80 does not perform 
in the usual manner, turn it off! 

Remove the cable and recheck your work, 
particularly the cable connections themselves. 
Do it with a friend so you don't overlook 
familiar errors. 

If all is well, apply power to the computer 
and to the I/O latch, and again assure the pro- 
per operation of the computer. At this stage, be 
especially quick and careful. 

The device is now complete and ready for 



testing. Set up these programs: 

10 PRINT INP<l78>;:GWO 1(1 

211 (HIT 178.255 : OUT 178.0 : GOTO 20 

M) FOR X = TO 255 : out 178. X : NEXT : GOTO K) 

Run 10. The screen should repeatedly display 
255. Now ground each input of Z4 in turns 
(pins 2, 4, 6, 8, 12. 14, 16. 18). The values 
displayed should change. Record them, convert 
them to hexadecimal and binary, and observe 
their relationship to the grounded inputs. 

Run 20. Briefly connect an earphone, in 
series with a 100 to 500 ohm resistor, between 
ground and each output of Z5 and Z6. You 
should hear a buzz of identical pitch (the level 
may vary) from each output. 

Run 30. Reconnect the earphone, but notice 
that the pitches vary from a buzz to a series of 
very slow clicks. 

When your device passes ail these tests, it is 
ready for use. If you have the background, put 
the input -output latch right to work. Other- 
wise, next month: how it works, why it works, 
and what to do with it. 



Problems? Send a complete descriptions of 
symptoms and an SASE to me at Roxbury. 
Vermont 05669. Calls accepted (not collect!), if 
your TRS-80 and telephone share the same 
desk.l 
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SO INPUT 



In your article "Screen Editor" 

the author uses expressions like . . . 

"all we have to do is 

stick a zero at ... . " Well, I can 

tell you where to stick it! 



Fully Functional Fix 



I purchased a Level II, 16K. TRS-80 last 
January and a 32K expansion interface last 
July; for the most part I am a satisfied TRS-80 
owner. However, a problem arose within the 
memory of the expansion interface. Using the 
default option by responding with ENTER to 
the MEMORY SIZE? request, not all 48K of 
RAM was available in the machine; by not us- 
ing the default option all the memory could be 
accessed. 

The Radio Shack Computer Center in Buf- 
falo charged me $55 to fix this problem. They 
installed a new interface board that eliminated 
the buffered cable. Regretfully, when I tested 
the computer at home the same problem re- 
mained. I returned the TRS-80 to the service 
center where it was discovered that a memory 
chip, "though fully functional," was not re- 
sponding to the default option. I was informed 
that the problem was solved by merely rear- 
ranging the memory chips. 

One of the principle reasons I purchased a 
TRS-80 was anticipated high quality follow-up 
service. I am not pleased that (1) Radio Shack 
"fixes" things that are fully functional and 
charges me for this service, and (2) so much of 
my time has been wasted on this problem. 

Dr. Grant Ian Thrall 
Buffalo, NY 



Findisk-II 



In the January issue you reviewed the Mum- 
ford disk indexing program, which I have used 
and found to be a fine program. However, your 
readers should also know about Documan 
Software's Findisk-II which I now use. It is the 
same price, does all the work of the Mumford 
program and has some very useful added fea- 
tures. 

Most useful of these is an Update routine 
that revises the Master Index by eliminating 
killed files and adding any new files — automat- 
ically — just be reading the revised disk. 

Another feature that I find helpful in 
Findisk-II is the ability to add a description to 
each file name so that those terse file names of 
yesteryear can be deciphered. And we all have 
several versions of most programs, so this fea- 
ture permits their specific differences or sizes to 
be recorded. 

Since NEWDOS and VTOS allow diskettes 
to be numbered during formatting, another 
good feature of Findisk-II is its ability to read 
those numbers automatically if they are used. 



No matter which program you use, I am con- 
vinced anyone with disks needs a program of 
this type to keep his sanity. 

George Kelly 
Tempe, AZ 

Single/Double Density 



I just received my March issue of 80 Micro- 
computing and am reading it from cover to 
cover. I am glad to see your company publish a 
magazine dedicated to the TRS-80. There are so 
many things about the TRS-80 and associated 
hardware that the companies won't tell you 
about. 1 would like to see your magazine talk 
about disk drives, single vs. double density, 35 
vs. 40 vs. 77 track. 

When I bought my 35/40 track drives I was 
led to believe that they were 40 track single 
density disk drives and that the expansion inter- 
face could not process double density disks. 
Well, to my surprise and without the help of the 
sellers, 1 found out my disk drives were capable 
of handling double density. 

In addition 1 see one company now coming 
out with a black box that converts the expan- 
sion interface to double density. This could in- 
crease my drives from 102K of available space 
to 204K. In addition, if I had all four drives, I 
could go all the way to 816K space. 

Now I am looking closely at the worm gear 
drive which moves the recording heads on the 
drive to see if they could be changed to give me 
77 tracks vs. 40tracks. I tried my 77-track patch 
pack to see if the DOS, computer and interface 
could handle 77 tracks. Well the DOS and com- 
puter clicked off all 77 tracks without any prob- 
lem. But of course the disk drive stopped at 40 
tracks, even though it continued to try and ad- 
vance beyond the stop. 

My observations on this indicate that by just 
changing the worm gear and possibly the record 
head 1 could increase my disk drives capacity 
from 35/40 tracks to 77 tracks. Think of this, 1 
could possiblv increase my disk drives from 
102K to 1 ,576,960. That's 1 .5 Meg disk storage 
for four drives. I would like to know what your 
readers think of this idea. 

Donald H. Bennett, Jr. 
Woodbridge, VA 



Print the Directory 



grams, each having a unique file name, 1 found 
it hard to keep track of the location of a file and 
correct spelling of a file name. 

Recently Radio Shack published a BASIC 
language routine that routes the information 
normally destined for the screen to the printer. 
1 found that running the statements under BA- 
SIC and then reverting to DOS by CMD"S" 
allowed me to print the directory listing under 
the D1R command. 

1 incorporated this into a program which, 
after printing, I could return to BASIC using 
the BASIC* command and run the program us- 
ing a GOTO 100 command. This program 
saves me the trouble of remembering the ad- 
dress and values required to set and reset the 
VIDEO/PRINT operation. 

10 'PROGRAM roPRIvi VlinoiNM) 

20 ■ 

30 POKE l6414,I41:POK£ IMI 5 .' 

4() CMIVS" 
50 I NO 

H) ' 

HK) ' PROGRAM TO RI St r VIDEO 

IK) • 

120 POKEI6l4|.88:POKE lMis.4 

IV) l- NO 

D. E. Fitchhorn 

Albuquerque, NM 

Beat the Cheat 



In response to Mike Tollerton's dilemma 
(Microchess cheating), I suggest he continue the 
game: 



MOVE WHITE 

13 F8-F7 

14 F7-E7 

15 E7-D6 



BLACK'S RESPONSE 

G8-E7 

C7-B8 

CHECKMATE!! 



The lack of a printout routine in TRSDOS 
for printing the disk directory has been a prob- 
lem for me. When 1 had accumulated several 
disks with several versions of a number of pro- 



The above not only provides a happy solu- 
tion to Mike's problem, but also proves that 
"Crime Does Not Pay". 

I would like to add my plea to those of Mark 
S. Lucas and Christopher M. G. Buttery for 
machine and assembly language discussions in 
plain simple English with step-by-step instruc- 
tions and a lot of "for examples". 

In your article, "Screen Editor", the author 
uses expressions like: "This turns out to be 
quite simple on the TRS-80"; "This is easy to 
implement"; "All we have to do is stick a zero 
at ... " Well, I can tell you where to stick it! 

Articles like this are frustrating. The pro- 
gram listing looks impressive, but how do 1 get 
it into my machine and how do 1 use it? 

Another frustrating example: "EDTASM on 
Disk" in your first issue. The heading above the 
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title teasingly states, "A step-by-step proce- 
dure . . .," etc. Fine! Until you get to Step 6. 
Stone wall! How do you type Program A into 
that little square inch of space in the lower left 
of your screen? 

You must realize that when Radio Shack 
came on the scene a vast new breed of amateur 
computerists was spawned. People like myself 
who, with no previous knowledge, struggled 
through and mastered Level 1 BASIC (thanks 
to David Lien) and with that foothold went on 
to grapple Level 1 1 . 

Now we have this big chasm, this no-man's- 
land, between BASIC and seemingly unreach- 
able machine and assembly language. Please, 
somebody, show us the way. 

Robert L. Boelke 
Alt a Loma, CA 



Warranty Clarified? 



I found your first copy of 80 Microcom- 
puting, like Kilobaud, excellent. Congratula- 
tions on this new publication. 

After reading articles and columns dealing 
with TRS-80 modifications, readers may be 
tempted to pop the covers off of their own 
equipment. Before they break the seals they 
should be aware of Tandy's little publicized ser- 
vice policy. The Tandy policy is to refuse to ser- 
vice and/or impose a substantially higher repair 
charge. I, for one, will continue fighting this 
policy. (See letter below.) I feel that if all 
TRS-80 owners and your publication support 
my protest of this policy, Tandy will have to 
change it. 

I do know that the service policy from most 
major computer manufacturers allows owners 
to touch their hardware beyond the keyboard, 
especially after the warranty period. With Tan- 
dy's introduction of the TRS-80 Model II, they 
now are entering the "major leagues" of com- 
puter manufacturers. They are comparing 
Model II with DEC, IBM and HP in their latest 
catalog. As far as service policies are con- 
cerned, however, the comparison stops here. 
Ernest Kirschner 
Durham, CT 



Dear Mr. Kirschner: 

Mr. Kornfeld has referred his copy of your 
letter of September 14, 1979 addressed to the 
Federal Trade Commission to me for response. 
As I view your letter, you make two related 
complaints — the first is directed at our practice 
of making a higher charge for repairs where a 
customer has modified or tampered with com- 
puter equipment and the second is our failure to 
give notice of this policy. 

We feel our policy of refusing service and /or 
imposing a higher repair charge on computer 
equipment that has been modified or tampered 
with is not only legal but is totally justified. 

Servicing and repairing computers is highly 
technical and in those instances where repairs 
are attempted by an unskilled technician or 
modifications are made to a system, subse- 
quent repair work and servicing becomes ex- 
tremely difficult. Not only must a technician 



find and fix the real problem, but he must also 
test the entire unit to make certain that in at- 
tempting to fix the unit the person tampering 
with it did not create additional problems. 
When modifications are involved, the techni- 
cian has the additional problem of trying to 
ascertain the nature of the modification and 
whether it is the problem. 

The truth of the matter is that we simply do 
not want the responsibility of guaranteeing our 
work on equipment that has been modified or 
tampered with by unskilled technicians. 

I feel your second complaint has merit. 
While I know of no law, rule or regulation re- 
quiring a seller to advise consumers that if they 
tamper with or modify a product the repair 
charges at the sellers facility for such product 
will be greater than those charged for other 
products, I do feel this information should be 
made known to consumers. 

We are considering this problem and in all 
likelihood we will insert this information in our 
owner's manual or on the warranty card the 
next time it is reprinted. In this manner, we can 
hopefully avoid future instances of consumer 
dissatisfaction. 

Louis G. .Neumann 
Staff Attorney- 
Tandy Corporation 

DOS to BASIC 



Here's how to AUTO LOAD a BASIC pro- 
gram from Radio Shack's DOS. Lnter 
TRSDOS 'DEBUG' utility. Type D6B00 
(enter); to display memory locations to screen. 
Type M6B00 (space); and enter the following 
machine code exactly as shown: 

ABU). 21 Of 6B 22 IA 4<) 21 2C AB 22 2A AB ( 3 21) 

40 1.5 

6BI0: 2A 2A AB 7 l II 0A CA IF 6B 23 22 2A AB II 
C9 21 

AB20 E3 03 22 16 40 3t OU C3 ID 6B 20 20 IF 42 

41 $J 

AB30: 49 4» 01) Of) 01) 52 55 41 22 41) 45 4f 55 45 

22 0A 

Remember to use the space bar to increment 
to the next location. After the OA at location 
6B3F is typed, press (enter) and then type 
G402D (enter) to return to DOS READY. Type 
TAPEDISK (enter) and save the following pro- 
gram: 



f MINI I ( Ml):OABl«>ABM A Bill) 
I (enierMo return to IX)S Kl ADY. 



You now have a CMD file program called 
MENUE/CMD which when executed via 
DOS's 'AUTO' command will load 'BASIC'. 
set number of files to 3 (default value), set 
memory size to maximum (default value), and 
RUN a BASIC program called "MENUE". 

The BASIC program "MENUE" may be 
any program previously saved using 
"MENUE" as its filespec or it may be an actual 
diskette -MENUE- with program choices 
listed. If you have a dedicated diskette and wish 



to auto execute some other filespec, then 
modify memory locations 6B39 to 6B3D to 
contain your own five character filespec. For 
example HEX 4D - M, 45 = E, 4E = N, 55 = U, 
and 45 = E. INVEN would be 49 4E 56 45 4E. 

Gary Alcorn 
Tempe, AZ 

Avert Disaster 



I work full-time as a programmer analyst at 
a large firm. I have never written to a maga/inc 
before, but 1 noticed a program in your maga- 
zine which could cause financial disaster, even 
if used as written. This is the program in the ar- 
ticle "Passing the Plate", which appeared in 
the February issue. 

I have two suggestions for anyone who is 
thinking of using this program: 

1 . Instead of erasing last week's data, keep a 
separate tape for each week, and save the data 
twice on each tape. In the unlikely event that 
both sets of last week's data are bad, you can at 
least pick up from the week before. 

2. Unless you have a printer, and have ad- 
justed this program to print all detail informa- 
tion), don't throw away the books! Keep them 
up as usual, just in case . . . 

Finally, if you are going to computerize any- 
thing beyond the household budget, it is a good 
idea to show your programs to a professional 
accountant or business consultant. 

Jim Slack 
White Cloud, Ml 



Mis'Guide'd 



First of all, I very much appreciate the 
positive review of my publication, "Guide to 
TRS-80 Information," under Rival Publica- 
tions II, 80 Microcomputing , February 1980, p. 
38. 

At the same time, however, you can under- 
stand my distress that this review quoted the 
wrong price for the "Guide." With a low price 
booklet such as this I'm sure you can seethe im- 
portance of avoiding extra processing steps, 
time and costs. 

The "Guide" in fact sells for: 

1 copy $2.80 plus .50 postage 1 and handling 

($1.50 Airmail, if overseas) 

2 to 9 copies $2.75 each 
10 to 50 copies $1.90 each 

(plus 20 0; o postage, if overseas) 
By the way, no one has ever returned a 
"Guide" for a refund. Thank you for your 
cooperation. 

F. £. Huebner 

Oak Park Ml 



New Column? 



1 am writing to ask that you consider a new 
column for your new 80 Microcomputing 
magazine. 

Continue to next page 
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While your magazine quite rightly caters to 
the many individuals who own a Model I, a 


Paid for Itself 


80 Skywatch 


growing number of other persons like myself 
are investing in Radio Shack's new TRS-80 






I just cannot let another day go by without 


Fairborn University is a very modest affair 


Model II, and need some way to regularly ex- 


writing to you about your new microcomputing 


devoted to photoelectric observations of vari- 


press their findings. 


magazine. 1 can say, without a doubt, that your 


able stars, lunar occultations, etc. A TRS-80 is 


I feel that 80 Microcomputing has a respon- 


magazine is the best around for TRS-80 users. 


interfaced to the photometer for realtime data 


sibility to these new TRS-80 owners, who are 


Your first issue answered two questions I 


collection and for data analysis such as cal- 


most likely Model 1 owners too. to provide a 


have had for a year. Your second issue really 


culating extinctions, local sidereal time, etc. 


column in w hich softw are can be evaluated and 


blew my mind. It cleared up three problems 


Perhaps other TRS-80 owners also use their 


programming routines can be shared. 


I've been having with my disk system. 


TRS-80 in astronomically related activities? If 


John I. Spady 


In my mind, your magazine has already paid 


so, 1 would very much like to hear from you. 


Seattle, WA 


for itself with two issues, and I have ten more to 


Russ Genet 




come! 


Fairborn University 


We are currently considering a regular Model II 


David R. Laplante 


1247 Folk Road 




column. — Eds. 


Worcester, MA 


Fairborn, OH 






5&DEBU 

KWICer Index 


9 

However, if you include the time it 
takes to son the names before you can 
print your labels, the Galactic Software 


have been confused by this, and let me 
remind readers that they are welcome to 
call me at home with questions or clari- 








I have discovered that there are two 


Inc. Mail/File is much faster than any 


fications on any of my articles. 






errors in the Disk BASIC listing of my 


of the other programs. There is also a 


Dennis Kitsz 






KWIC Index program published in the 


patch to the program available from 


Roxbury, VT 






March 1980 issue of 80 Microcomput- 


Galactic Software that will now allow 








ing. Line 1110 should read: 


you to print up to six labels across. 
This effectively increases the 


DIR Overwrite 








throughput greatly. This, when coupled 








1110 IFW(I) = TWTHEN 1190 


to the fact that the program is always 
ready to print both an alphabetical or 
zip code list, makes it the fastest mailing 


1 ran into a problem following Mssrs. 
Butlers' instructions in their EDTASM 
on Disk article. Step 19 says, "Type 






Line 1160 should read: 


label program for the TRS-80 Model I 
Computer. 
Galactic Software has also released a 


Tapedisk," then gives instructions to re- 
spond to the "?" prompt. 

Upon loading Tapedisk, however. 






1160 TC=TC+""+TW 


version of the Mail /File program for the 
TRS-80 Model II. Like the Model 1 ver- 
sion this program is also always ready to 


my machine crashed into Debug, which 
was still in memory even though the De- 
bug (off) command had been executed. 






I am sorry to have inconvenienced 


print labels in both alphabetical and zip 


The TRSDOS manual recommends typ- 






you and your readers. 


code order. However, the Model II ver- 


ing DIR after Debug (off) to avoid this 






I have also had several questions 


sion will handle 2,500 names and ad- 


problem. Unfortunately the EDTASM 






about the bracket in the program listing 


dresses. 


has been moved by Program A to the 






for Investment Analysis. The printer on 


Reese C. Fowler 


overlay area of memory and is therefore 






which I made the listing does not print 


Peterborough, NH 


overwritten by the DIR command. 






the up arrow (t) but prints the bracket 




Assuming the user's machine has 32K 






(]) instead. This is fairly common for 




or more the fix is to move the EDTASM 






many printers and shows up in many 


Re-video 


to memory starting at 8000H and re- 






program listings. 




trieve it from there. 






Leslie E. Sparks 
Durham, NC 




Only four changes are required: 






In "Reverse Video" (April), my mind 








transformed a type 75452 integrated cir- 










cuit into Z52. 


In Program A line 001 30 becomes 6583 II 0080 00 130 






Galactic Update 


Please make these corrections: After 


LD DL.8000H ;Dest. Address 






the subheading "Reverse Video" at the 


In Program B line 001 20 becomes 7FFO 2 10080 001 20 








bottom of page 54, change all references 


ID HL.8000H ;Source Address 
Add siep 18a. "Type DIR (enter)" 








There may have been some confusion 


from Z52 to Z4I. 


In siep 20 ihe instructions to Tapedisk should Ik- 






about my article in the Feb. issue of 80 


The plated through hole in the wiring 


F £DTASM/CMD:0 7FF0 9A40 7FF0 (enter) 






Microcomputing concerning the speed 


layout also goes Z41, as does the arrow 








of the Galactic Software, Inc. Mail/File 


labeled "Video Mixing" in the schemat- 








program. As stated in the article the ac- 


ic. If you followed the trace, you should 


Good luck with the new magazine. 






tual printing of labels by this program is 


have connected the wire correctly in 


the first issue was excellent. 






not as fast as some of the other pro- 


spite of the labeling error. 


Wendell Kapusttak 






grams on the market. 


My apologies to readers who may 


Downers Grove, IL 
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THERE IS A DIFFERENCE IN 



TRS-80 DISK DRIVES capacity 



Expansion interface - gives 
your TRS-80 the disk capacity 
it needs, and much, much more! 



10 to 40 MByte, 8" 
Winchester drive - 
expands capacity far 
beyond Model II storage. 



Single sided minifloppy 
up to 1 50 KBytes of 
storage capacity. 



Single or double sided 
8' floppies - up to 2.5 
MBytes in dual drive 
cabinet - for the 
serious TRS-80 user 




LOBO DRIVES' new family of disk memory 
products provides you with a choice of memory 
capacities you need to effectively execute the 
complex business software you've developed 
for your TRS-80*. LOBO DRIVES' selection of 
readily available, software compatible drives 
permits you to expand your inventory, payroll, 
customer list, and accounts receivable files as 
your business grows. 

And LOBO DRIVES brings you more ... a new 
plug-in expansion interface that provides an 
easy way to add hardware enhancements, 
communications capability, and programmable 
features . . . and it comes with the LOBO 
DRIVES famous 1 year, 100% parts/labor 
warranty. 

Call or write for the complete LOBO DRIVES 
story. Find out just how competitively priced a 
family of high capacity drives can be . . . 



Quantity discounts available - 
Dealer inquiries invited 



drii/es 



w 



1^15 INTERNATIONAL 



935 Camino Del Sur Goleta, 
California 93017. 
(805) 685-4546 

'CAN YOU REALLY AFFORD 
TO PAY LESS''" 



Yes, I want to know more about LOBO Drives 
and what they can do for my TRS-80. Send me 
information on: 

□ 5 1 /4-in. Floppy drive □ 8-in. Winchester hard 

disk, 10 Mbyte drive 



D 8-in. Floppy drive 
Single sided 
Double sided 



Name 

Company 

Address 

City State 

Phone No. 



D Double density 
expansion interface 



Zip 



If dealer, provide resale no. 



* TRS-80 is a registered trademark ot Radio Shack, a Tandy Company 



• Reader Service - see page 162 
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More lor Less 

Speed. Capacity. Price 

The Vista V-80 mini disk system 
is 8 times faster than the 
TRS-80, 23% more 
storage capacity, and 
costs only $395. 

Compare our performance to 
Radio Shacks TRS-80* Then 
match our price with theirs. Then 
decide which one is for you. 

Features 

• Vista offers 102K bytes to 
Radio Shack's 89K. That's 13K 
more bytes per drive for Vista. 

• The V-80 operates at 12ms versus 40ms 
for TRS-80. Our drive can operate at 5ms, but 
only 50% of TRS-80 will operate at that speed; 
therefore, Vista has purposely set the access time 
at 12ms. 

• Totally compatible with all available disk operating 
systems. 

• Upgraded system. Increased storage and speed 
patch supplied at no charge by Vista. 

• Drives are interchangeable for any location from 
Drive 0— thru Drive 3. 

• Immediate Delivery. 

• 120 Day Warranty 

Prices: 

Single Drive System $395 

Two Drive System $770 

Four Drive System $1450 

•TRS-80 is a registerea trademark ol Radio Shack, a Tandy Company 
TYPICAL CONFIGURATION 




FLOPPY 
DISK 

OHIVE 

#1 



FLOPPY 

DISK 

DRIVE 

»2 



FLOPPY 

DISK 

DRIVE 

#3 



FLOPPY 
DISK 
DRIVE 



EXPANSION 
MODULE 



^2 



Vista Expansion Module 

The expansion Module provides a double density modification 
to your current Radio Shack interface that allows you to format 
diskettes in either single or double density. In double density 
format, your Vista Drive increases your storage capacity up to 
204K bytes on a single 40-track drive. 

To insure the highest performance possible, without com- 
promise, we recommend that you use Vista disk drives in con- 
junction with our Expansion Module* For a demonstration on 
your system call TOLL-FREE 800-854-8017 

PriCG $239.00 (includes all hardware and software) 

'Vista cannot guarantee Radio Shack drives to operate 100% in double 
density 



The Vista Computer Company 1401 Borchard Street • Santa Ana. California 92705*714 953-0523 



I 
I double density | 

, I CONFKMNUTKM i 

-'=■- I (204K»YTES) , 

COMPUTER I L— — — . ___J 

Single Density Configuration (102K Bytes) 
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Bigger Is Better. 

Expandable storage. Greater Versatility. 

The Vista Model II* Disk Expansion 
System provides one, two or 
three drives, and adds 
up to 1.5 million bytes 
of storage. 

You say you want more disk stor- 
age, more programming versatil- 
ity ... at a reasonable price. Say no 
more. Our Vista Model II Disk Ex- 
pansion System may be just the an- 
swer for you. Choose from 1 , 2 or 3 
drives, already mounted. Each ad- 
ditional disk drive will add about 
1.5 million bytes of on-line stor- 
age to your system. Buy only 
what you need now. As your 
needs grow, you can continue to 
expand your capacity by adding 
another drive. It's that simple. 

But the best part we've saved for 
last. The price. It's cheaper than 
Radio Shack, yet our Model II will do 
everything Radio Shack's expan- 
sion system can do. The only differ 
ence is our Model II will keep on working long 
after most others have stopped. That's why we are justifiably 
proud of our product's high reliability. And our 120-day warranty. Actually, it's 
not hard to stand behind a product — that works — if you know what we mean. 

'Model II is a registered trademark of Radio Shack, a Tandy Corporation 

COMPARE OUR INTRODUCTORY LOW PRICES 

1 -drive Expansion System $1 ,000 3-drive Expansion System $2,100 

$ 525 




2-drive Expansion System $1 ,550 Additional Drives Only 

NO WAITING • IMMEDIATE DELIVERY. 



NAME 



ADDRESS 
CITY 



PLEASE ONE 

□ CHECK OR MONEY 
ORDER 



CREDIT 
CARD 



n cod 



. STATE 



TELEPHONE * / 

OPTIONAL 

COMPANY AFFILIATION 



PLEASE CHARGE MY CREDfT CARD: 

D MASTER CHARGE D BANK AMERICARO VISA 

CARD NO 

EXPIRATION DATE 

PRINT EXACT NAME 

OF CARD HOLDER 



Item 



Quantity 



Price 



INTENDED APPLICATION 



SIGNATURE 



Subtotal 

Calif Res add 6% sales tax 

Per- Unit Shipping and Handling 

($5.00 UPS - $7.50 UPS Blue) 

Total 



J22 



The Vista Computer Company 1401 Borchard Street e Santa Ana. California 92705 e 714 953-0523 ^65 



' Rtadf S*nic* — sm page 162 
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SO NEWS 



by Nancy Robertson 



VPI Hands-on Workshop 




The chemistry department of the Virginia 
Polytechnic Institute and State University, 
Blacksburg, VA will be offering a workshop to 
teach users how to interface and use the TRS-80 
in instrumentation and automation systems. 
The workshop will be held June 23-27. 

The program will emphasize participation by 
students in designing interfacing and other 
hands-on learning. 

For further information contact Dr. Linda 
Leffel at the Institute (703) 961-5241. 



News for VTOS Users 



If you are currently running, or interested in 
running under the VTOS Operating System, 
Virtual Technology, Inc. Dallas, TX would like 
to bring up two patches: 

1) In case you have no! received Maintenance Release 12— <for 
sequential files), it is: 

PATCH SYSO/SYS.RVEJARAJ using - 
X"4744' =00 

2) In case you have not received Maintenance Release 1} (for 
variable length records), it is: 

PATCH SYSO/SYS.RVEFARAJ using — 

X'4864'=CDF0 4A 

X4AF0' DD 7 1 08 DO 75 OC DD 74 OD C9 

In addition Virtual has three new products 
for the Radio Shack TRS-80 Model I level II 



microcomputer system: the VTOS 3.1 Oper- 
ating System, the VTOS 3.1 Reference Manual, 
and the VTOS 3.1 System Kernel. 

VTOS 3.1 contains modifications to the 
FORMAT, BACKUP, and CHAIN utilities 
that provide better service for single drive users 
and improvements to the PATCH utility. New 
MEMORY and ALLOC commands yield 
faster memory and disk resource management. 

Combined with these are keyboard and 
printer speed buffers which enable you to type- 
ahead of the system without missing key- 
strokes. 

The VTOS 3.1 Reference Manual contains 
the detailed functioning of each command and 
also provides an insight into the theory of 
operation. 

The VTOS 3. 1 System Kernel contains all of 
the file maintenance facilities required by an as- 
sembly language program without operating 
system utilities. The VTOS 3. 1 System Kernel is 
available to software vendors, under a license 
agreement, to be used as the distribution media 
for the vendor's own software. 

Reader Service *-* 179. 

Waltham MA 



Anyone interested in learning more about 
the Exatron Stringy Floppy is invited to 
the first East Coast ESFOA workshop, Sat- 
urday, May 31 at Micro Communications, 80 
Bacon St., Waltham MA. Units available for 
hands-on experience; refreshments avail- 
able. Workshop will run from 10 to 6. Phone 
(617) 899-8111 for more details or direc- 
tions. 

Centronics Walk-in Service 



Centronics Data Computer Corporation of 
Hudson, NH will offer an option by September 
1981 of 21 Centronics service centers in the 
U.S. where Centronics distributors, dealers and 
printer owners can return their machines to the 
local service center for repair or routine 
maintenance, rather than calling for a service 
"house-call". 

Seven U.S. locations now have this service. 
They are located in Woburn, MA; Philadel- 
phia, PA; Chicago, IL; Dallas, TX; Sunnyvale, 
CA; Costa Mesa, CA; and Hudson, NH. 

The company's walk -in service will repair or 
replace a machine within five working days, 
with priority service available if needed. The 
walk-in service will save customers 30 percent 
on the regular Centronics service visit or con- 
tract . 



Data Base System 



V. R. Data Corporation, Folcroft, PA, has 
announced a new Data Base System for the 
TRS-80. Customized records can contain up to 
25 user-defined variable length fields and up to 
250 characters per record. 

The system maintains a dictionary of the 
fields and their characteristics and manipulates 
any record by its field name. 

Field changes can be applied on individual 
fields or generically to the file. Records can also 
be linked into a logical "family" of records 
regardless of their physical location on the file 
or order of creation. 

Reports can be printed in either horizontal or 
vertical formats. 

This four program BASIC system requires a 
Model I with 48K, a minimum of two disk 
drives and a line printer. Programs are also 
available for Model II at 950 records per 
diskette. 

Reader Service ^161. 



Children's Computer Camp 




Dr. Michael Zabinski, Professor at Fairfield 
University, will be directing an overnight sum- 
mer camp in Moodus, CN for ages 10-17 where 
the main activity will be computers. 

June 29 to July 4 small group instruction will 
be offered to campers on TRS-80 computers. 

The recreational facilities of the Grand View 
Lodge include swimming and tennis. 

Contact Michael Zabinski, PhD. at 
203-795-9069 or write Computer Camp, Grand 
View Lodge, Box 22, Moodus, CN 06469. 



32 • 80 Microcomputing, May 1980 




E-Z Loader Assembly 



Tape for Easy Loading 



The E-Z Loader tape digitizer developed by 
Dave Miller and Paul Goelz accomplishes three 
tasks critical to reliable tape loading. It outputs 
constant level pulses, even if the input pulses 
are varied, facilitating playback. It eliminates 
double triggering by the computer on the same 
pulse, which facilitates loading outside tapes. It 
only "looks" for a pulse when one is supposed 
to be present, which helps prevent false trigger- 
ing of the computer on noise pulses thay may be 
on the tape. 



wm 
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E-Z Loader Circuit 



Circuit boards and complete assembly in- 
structions are available for $6.00. 
Reader Service ^182. 



General Ledger System 



The General Ledger System for the TRS-80 
Model II is now available from Taranto and 
Associates, San Rafael, CA. 

This system features unlimited inherent files, 
a year-to-year comparison on the income state- 
ment and the balance sheet, account transac- 
tion summary reports up to a full year and the 
automatic posting of retained earnings to user- 
defined accounts. 

The company asks customers to fill out a 
questionnaire about their needs so that the sys- 
tem will fit specific business requirements. 

The General Ledger Sytem is available for 
$249.95. 
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Package Integrates 
Model II Applications 



For the first time, a system is available for 
the TRS-80 Model II user that completely inte- 
grates application development all the way 
from a professional operating system through 
database management and documentation. 
The package, called the Advanced Application 
Development System, is being offered by the 
Software Firm, Inc., Denver, CO. 

In use for several years on other Z-80 based 
systems, this development system has reduced 
average development time by over 50"o. With 
the new package no modifications are required 
to the Model II. 

Device independence is included in the de- 
sign, which greatly expands the hardware op- 
tions available for the Model II by providing 
for straightforward incorporation of devices 
that Radio Shack does not support, such as 
spinwriters, additional terminals, special key- 
boards, line printers, plotters, etc. 

The package costs $595 for the Operating 
System, Datamaster, Monitor, Basic and 
Script. Other components are individually 
priced. 
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Reference for Educators 



The TRS-80 Microcomputer Sourcebook for 
Educators, a comprehensive guide to the use of 
microcomputers as a medium and an object of 
instruction in the classroom, and as a tool for 
the school administration, is available free 
from Radio Shack. 

The booklet briefly describes the use of the 
microcomputer in the classroom and provides 
guidelines for selecting a system based on po- 
tential applications, costs, service, reliability 
and courseware. 

Reader Service ^ 172 

From CP/M to CP/M 2 



Lifeboat Associates, New York, NY, is now 
offering CP/M 2.0 for TRS-80 Model II com- 
puters. It makes it possible to run the existing 
CP/M programs for business accounting, word 
processing, scientific and special application 
programming on the new TRS-80 Model II. 

The entire system with complete documenta- 
tion costs $170. 

Reader Service ►-* 167 

Model II Compilers 
Developed by Microsoft 

Microsoft, Bellevue, WA, is announcing 
TRSDOS-compatible versions of their COBOL 
and BASIC compilers for the TRS-80 Model II. 
The company is the author of Radio Shack's 
BASICs, and complete line of system software 
for 8080, Z80 and the new 16-bit microproces- 
sors. 



The COBOL-80 compiler is an ANSI-74 im- 
plementation of COBOL, featuring complete 
interactive screen handling capability using 
ACCEPT and DISPLAY and has indexed and 
relative files. The BASIC compiler produces 
highly optimized object code that runs 3-10 
times faster than interpreted BASIC programs 
and is also available in a version for the TRS-80 
Model I computer. 

The BASIC compiler is priced at $395; the 
COBOL-80 at $750. 
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TRS-80 Leasing Available 



Radio Shack has announced that it is now 
possible to lease a TRS-80 Model II. A&A 
Financial Corporation is offering a 36-month 
lease, preceded by a 90-day warranty period. 

According to Vice President Richard W. 
Cree, of A&A Financial, "The true lease allows 
the customer to pay only for the use of the 
equipment. Payments do not apply towards 
ownership of the system, and customers have 
no obligation to buy at the end of the lease 
term. 

Further information on leasing a TRS-80 
Model II is available from participating Radio 
Shack stores and dealers, and Radio Shack 
Computer Centers, and from A&A Financial 
Corporation, Fort Worth, TX 76102. 



New Numeric Key Pad 



Microcomputer Technology Inc., West- 
minster, CA, has announced a 16-key nu- 
merical key pad kit for the TRS-80. Keys in- 
clude thru 9, (-), (/), ( . ), backspace and enter 
key. 
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Numerical Kev Pad Kit 
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TRS-80 Converts to 
Duplex ASCII Terminal 

Percom Data Company, Garland, TX, has a 
program available which will allow a TRS-80 
computer to be used as a full duplex ASCII ter- 
minal. 

The program, called TERM80 is written in 
Level II BASIC, and loads a machine language 
program for terminal operation. It is available 
on minidiskette with user instructions for 
$24.95. 
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Model II Word Processor 



WordMagic II, by CalData Systems, San 
Diego, CA, is a word processor designed 
specifically for the TRS-80 Model II. It has 
total TRS-80 file compatibility, full cursor con- 
trol, full edit capability, paging, printing, 
centering, automatic generation of a table of 
contents, etc. 

CalData Systems is asking $100 for the word 
processor with its manual. The manual is 
available separately for $100. 
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Video Screen Filters 



An optical filter that eliminates the glare on 
video screens and extends the life of CRT tubes 
is available from Sun-Flex Co. Inc., San 
Rafael, CA. There is no loss of resolution and 
the entire video display remains in view once 
the filter is in place. 

The price of the filter is $22.50. 
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Sun-Flex Video Filter 



Spikes & Hash Reduced 



Electronic Specialists' Inc., Natick, MA, an- 
nounced Super Isolator to curb electrical prob- 
lems such as power line spikes, surges, noises 
and hash. The device is intended to prevent 



problems with crashes, memory loss and 
glitches. 

The Super Isolator Model ISO-3 sells for 
$85.95. 
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Electronic Isolator that Cuts Hash 



10 Additional Megabytes 



Lobo Drives, Int., Goleta, CA, has three 
new 10 Megabyte Winchester technology hard 
disk memory systems; one each for the TRS-80, 
Apple and the S-100. 

The Lobo Model 77 10 T, A, S provides a way 
to add 10 Megabytes of high speed mass 
storage. 

Quantity prices begin at $4995 with volume 
discounts available to dealers. 
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Program to Correct 
Cassette Volume Levels 



The Verifier, a program available from Wolf 
and Associates, La Crescenta, CA, is designed 
to correct volume level for loading a pre- 
recorded cassette, to indicate the correct 
volume for playback on cassettes you tape 
yourself and to test the quality of a blank 
cassette. 

Wolf and Associates are selling this package 
for $14.95. 
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Keyed Access and 
Spooling Facility 



Two new packages by Automated Resource 
Management Inc., Irvine, CA, are on the 
market. 

KFS-80 is a subroutine which can be incor- 
porated in an application program to provide 
keyed and sequential access to multiple files 
within the TRSDOS. The package also includes 
a utility program for file maintenance and a 
demonstration program. This disk package 
costs $49.95. 

LPSPOOL, a two-disk package, is a line 



printer spooling facility for the TRS-80 Model 
I. It permits concurrent printing in the fore- 
ground while normal TRSDOS operation con- 
tinues in the background. Automated Resource 
Management Inc. is charging $39.95 for 
LPSPOOL in either the 32K or 48K version. 
Reader Service v 175 

Aids for Data Entry 

The Universal Data Entry System, by the 
Software Store, Marquette, MI, aids operators 
of CP/M systems in efficient and accurate 
data entry. Features include validation pro- 
cedures to improve data quality and duplica- 
tion of field items to eliminate repetitive en- 
tries. 

The two program system is priced at $195. 
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MOD II Software 



Small Business Systems Group has converted 
its most successful TRS-80 MOD 1 software 
programs for use on the TRS-80 MOD II sys- 
tem. 

Accounts Payable, Accounts Receivable, 
General Ledger, Payroll and Dental Billing are 
available for the one disk user. For the two disk 
user, we have A/R coordinated to GL, A/P co- 
ordinated to GL, and Payroll coordinated to 
GL, and an expanded Dental Billing. 
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Floppy Saver 



Floppy Saver, a reinforcing ring designed to 
lengthen the life of mini-disks, prevents 
damage to the center hole by the clamping hub 
and rotating spindle. Such damage can cause 
loss of the data and the disk. 

Floppy Saver is made a 7-mil (.007) mylar 
with paper-protected super adhesive backing. 
The rings are punched on a special steel die with 
a tolerance not exceeding .0005 inches. The 
Floppy Saver is installed with the special tool 
provided and in many cases can resurrect 
damaged mini-disks. 

Floppy Saver is available from Tri-Star Cor- 
poration, Grand Junction, CO in a kit of 25 
rings for $14.95. 
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ANDTRS-80 MODEL II. 



I 



TT 



TRS-80 Model II is designed for 
professional business applications. 
Your ultimate goal for your Model ll 
is probably a fast turnkey system that s 

i use and easy to expand To get 
there you need dependable, flexible 
system software to write the programs 
that run the whole show 

osoft's COBOL-80 and BASIC 
compilers are now available in 
versions fully compatible with Model 
ll TRSDOS You can have either I 
these universally popular program- 

1 anguages plus all the advantages 
of a compiler faster execution times, 
compact executable code, security 
for your programs 

With Microsoft s compiled languages 
you get a complete program develop- 
I system, including our standard 

^080 Assembler and LINK-80 

i 1 1 oader Your compiled 
programs are relocatable modules 
^an be linked to each other or 
to Z80 assembly language subrout ines 

COBOL-80 Compiler 

Microsoft s COBOL-80 is an ANSI- 
74 standard COBOL that supports such 
advanced data manipulation verbs 
as COMPUTE INSPECT STRING. 
UNSTRING, and SEARCH. Plus three- 
dimension arrays, full COPY facility. 
compound and abbreviated conditions 
and an optional packed decimal format 

saves on mass storage by as much 
as 40%. In addition to Sequential and 
Relative files. COBOL provides 

les. allowing records to be 

i red vv rh a user-specified key 
instead of a record number 

Interactive Si reen rfaadting Most 

i 'ess applications require machine 
.etion, lor matted screen displays 
and the ability to insert and de • 

nation as the machine prompts 

the user The COBOL ACCEPT/ 

DISPLAY verbs are implemented for 

i jrpose-to DISPLAY formatted 

ns and ACCEPT operator input 

CHAIN and Segmentation ideal 

onu-dnven application programs 
is COBOL-80 s CHAIN feature. With 



SHPTO ZAKSZEPHRVM 
COMPANY ZAKSWCGB 






idUplay 

CHAIN control is transferred from 
the menu program to any executable 
module as specified at runtime. 
COBOL-80 also supports Segmenta- 
tion to make maximum use of memory 
when large programs are executing 

BASIC Compiler 

The Microsoft BASIC Compiler has 
the fastest execution times of any 
BASIC available It is language com- 
patible with the Model II s interpreter 
so you can write and test your programs 
usmg the interpreter, then compile 
them for secure storage and effi 
execution 

Sen BASH Featves In addition 

to those language features provided 
with the interpreter, the BASIC < 

supports all the latest features 
of Microsoft BASIC 51: WHILE con- 
ditional statement. CALL, long variable 
names, and ANSI compatibility Plus 

xjmpiler has double precision 
transcendental functions (SIN. COS. 
TAN. ATN, LOG. EXP. SQR). 

Secure Besides being an indispens- 
able system software tool for develop- 
ing your own utilities and application 
programs, the BASIC compiler is ideal 
for producing programs for reea 
T he machi ne code for any appl icat ion 
program may be placed on a dis^ 
ROM or other media but the BASIC 
source progr, i tab- 

,s the original application 
program is protected from unautho- 
rized alteration. 
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< >|iliwinnd M;i< bine ( iKk-Compiied 
BASIC programs are fast and com- 
pact due to extensive optimizations 
performed during compilation; 

1. Expressions are reordered to 
minimize temporary storage and 
eliminate common subexpressions 

2. Constants are folded wherever 
possible 3. Peephole optimizations 
are performed 4. The code generator 
istempLv allowing optimal 
sequences to be generated for the 
most commonly used operations 

8. String operations and garbage 
collection are extremely fast 

i Microsoft BASIC Compiler or 
Microsoft COBOL-80 and get serious 
with your Model 1 1 Alter all. who's 
running this show? 

Prices tor COBOL-80 and BASIC Compiler 

inaud* the MACROS AMCfntXer and LINK-80 
Linking Loader and all documentation Docu- 
mentation purchased separately. 120 
COBOL-80 $750 

BASIC Compiler S395. 



For TRS-80 Model I software, 
contact Microsoft Consumer 
Products. 



ClOSOFf 



10800 Nr I 

819 

,je.WA 98004 
206:455-8080 
Tetex 328945 

Wc sot the standard. 




^<u 



Parlez-vous Fortran? Pascal? Forth? Confused? 



Languages 



by Jim Perry 

80 Staff 



New languages are appearing every month 
for the TRS-80. Why? Very simply be- 
cause the built-in BASIC is not really the best 
language for anything— except learning about 
computers! 

BASIC was developed in the early sixties at 
Dartmouth College. The name is an acronym 
for Beginners All Purpose Symbolic Instruc- 
tion Code. It was designed to be a simple lan- 
guage, easy to understand and learn, but was 
never intended to be a working programmer's 
tool. 

Because virtually every microcomputer de- 
signed in the past five years has used BASIC of 
some sort or another, it has achieved amazing 
popularity. Probably 90 percent of the people 
introduced to computers have started with BA- 
SIC. But as one programmer was heard to say, 
after finishing an elaborate software package in 
BASIC, "Programming in BASIC is like hit- 
ting your head against a brick wall, it's great 
. . . when you stop." 

So, what other languages are available, and 
why are they better? Last things first. What 
have the other languages got going for them 
that BASIC lacks? Read on and discover the 
amazing world of compilers. 

Sugar and Spice 

It's not what computer languages are made 
from; they are, in fact, special computer pro- 
grams, written in the most elemental computer 
language, machine language. The purpose of 
any computer language is to act as an interface 
between a B.P.U. (Bionic Processing Unit) and 
a C.P.U. (Central Processing Unit). Most peo- 
ple have a B.P.U. that is capable of expressing 
12,000 words, and some have been known to 



handle up to 35,000 (Mr. Einstein was in that 
category). 

Most C.P.U.s are only able to deal with a 
hundred or so words. The language program 
acts as a filter between these two extremes. 

Obviously, the more words that a computer 
language program can understand, the easier it 
is to talk to it. 

BASIC has repertoire of about 100 words, all 
of which are recognized by the BASIC inter- 
preter. In operation the interpreter examines all 
the words you care to feed it line by line and 
word by word. As it recognizes a word, it se- 
lects an appropriate set of machine code in- 
structions that do what the word says to do, 
and then tells the C.P.U. to follow the instruc- 
tions. 

After the C.P.U. hs finished its task, it re- 
turns to the interpreter for the next set of in- 
structions. The interpreter then looks at the 
next word. The entire process takes a very long 
time. The moral of the story: If you need to get 
results in a hurry, don't use an interpreter. 

Languages such as Fortran (from Formula 
Transactor, originally developed by I.B.M. in 
the fifties), are not interpreted in the manner 
just described, but are compiled. 

A compiler program is not as easy to use an 
interpreter, but it is usually 10 to 20 times 
faster. After the program is entered into the 
computer, the compiler is run, converting all 
the words it recognizes into machine code rou- 
tines. The result is an object code. The object 
code is the final program. It is very compressed, 
and there is no stopping and starting while 
things are checked out by an interpreter. 

The main hassle with this technique is getting 
all the bugs out . More obvious errors are picked 
up by the compiler, but if the object code is 
faulty you have to fix the source and compile 
again. Compilers also require a lot more mem- 
ory than interpreters. 



The structure of Fortran is still similar to 
BASIC; to some extent, BASIC was designed 
with advancement to Fortran in mind. Fortran 
shares a serious drawback — it is very difficult 
to read a long program and understand it. With 
a few GOT023456s and GOSUB4563s to hide 
the trail, the logical flow of a program becomes 
about as clear as mud. Both languages were de- 
signed before the concept of structured pro- 
gramming had been fully developed. 

Other Options 

Languages such as C and Pascal have been 
designed with structured programming very 
much in mind. With these languages, you call 
routines by name and define your own words 
where needed. With power like this you are en- 
couraged to write readable programs: IF 
DOOROPEN THEN CLOSEDOOR is an ex- 
ample of a self-explanatory program line. 

If you can't face the thought of learning as- 
sembly language but still want extra speed in 
your BASIC programs, then Infinite BASIC 
from RACET computes may be useful. With 
this system you have a selection of efficient sub- 
routines from which to choose. Infinite BASIC 
modules are loaded as subroutines (hat can be 
called from a BASIC program. For a graphics 
program you can select various subroutines and 
draw lines or scroll the screen at will. The 
modules are available to perform a hundred 
separate functions, all in assembly language. 
They are extremely fast. With powerful add- 
ons such as this, the usefulness of BASIC can 
be greatly extended. 

In this issue of 80 Microcomputing, there are 
reviews of tiny Pascal, Level III and a program 
for creating your own compiler (written in BA- 
SIC). In future issues we will have reviews and 
explanations of all the other TRS-80 compat- 
ible languages that are on the market. Remem- 
ber, BASIC is just the beginning! ■ 



IF YOU CAN READ, YOU CAN WRITE ! 

80 is mainly written by people like you, not an elite group of intellectuals. A lot of the readers think that it is difficult to write, but it is 
remarkably easy if you sit down and try. Other budding authors think that rejection slips are the rule, at 80 we accept about 70% of 
all submissions. There is a lot to be said for creative writing, including FAME & a small FORTUNE. There is even a helpful leaflet, 
"How to write for 80," available on request. So why not drop us a line and ask if we would like to see your article idea written up, it 
can't hurt to ask. 

Send all correspondence to Jim Perry, Managing Editor, 80 Microcomputing, 80 Magazine Street, Peterborough, NH 03458. 
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Poor 

Man's 

Floppy 



Now the widely acclaimed 
J PC Cassette System is available 
for your TRS-80* computer. 
The price is only $69.95. 



HIGH SPEED CASSETTE SYSTEM 




FOR TRS-80 



The TRS-80* is undoubtedly one of the best 
small computers around But its cassette re- 
cording system can be very frustrating, particu- 
larly if you can't read an important cassette. And 
getting the volume control set just right is really 
a pain. Waiting 45 seconds to load Blackjack 
is no fun either. 

JPC Products Company has developed an 
improved cassette system that uses your pres- 
ent cassette recorder but loads programs 5 
TIMES faster, with much better reliability. 

The original JPC cassette interface is the 
TG-3. which was developed 2 years ago for the 
M6800 computers It has been very successful. 
as you can see from the magazine and owner 
comments below. Now we have a similar unit for 
the TRS-80". At $69.95 plus shipping the TC-8 
is a real value 

PRAISED IN REVIEWS 

"The JPC Products Model TC-3 cassette inter- 
face provides a VERY RELIABLE means of 
saving programs and data to tape . both 
fast and reliable The TC-3 is very convenient 
to use The hardware is excellent . . The 
TC-3 is rated AAA because it is an excellent 
low cost alternative to a floppy disk system for 
the person on a tight budget " 

Product Review 
68 Micro Journal 
June 1979 



OWNERS LOVE IT 

"I love your interlace I have recommended it to 
all." DO (Florida) 

"Excellent! A poor man's floppy. Thanks." 
F.B. (Quebec) 

"It is great I can't believe it s so fast " 
E.J (Arkansas) 

"Great! Fast! Reliable! Worked first time!" 
C.Z. (New York) 

"It is the answer to my prayers!" 

S.S (New York) 

"The best through-the-mail device I have ever 
purchased." J. P. (Florida) 



"I m glad I bought this kit Worked first time 
Never one bad load." fl M (New York) 

"The first kit I have ever built that worked the 
first time without any adjustment or trouble- 
shooting ." F L. (Colorado) 




INEXPENSIVE MEDIA 

The TC-8 and your present cassette recorder 
will allow you to store 50.000 Bytes on a stan- 
dard 10 minute cassette Or 300.000 Bytes on a 
standard 60 minute cassette At a cost of $1 to 
S3 OurC- 10 data cassettes sell for S1 39 with a 
money-back guarantee. 

PLUG IT IN 

The TC-8 plugs into the expansion connector 
on the back of the keyboard and does its thing 5 
TIMES FASTER! Less than ONE BAD LOAD in 
a MILLION BYTES! With the VOLUME CON- 
TROL ANYWHERE BETWEEN 1 AND 8 

If you prefer you can leave the existing re- 
corder connected normally and add a second 
one for the TC-8. 

THERE'S A CATCH 

The TC-8 magic is mostly done in software. 
So you have to load a small program into the 
upper seven hundred bytes of memory. It is 
usually out of the way there. We provide the 
software on a cassette that comes with the 
TC-8 Just load it in 

••TRADEMARK OF TANDY CORPORATION 



YOU CAN BUILD IT 

The TC-8 is available as a kit for $69 95 plus 
shipping. It is very easy to build. It should only 
take you an hour or so. Even if you have never 
built a kit before, you can build the TC-8. 

If you can get toothpaste on a toothbrush, you 
can learn to solder Our instruction manual will 
show you how 

"CANT FAIL" GUARANTEE 

If you build the TC-8 and for any reason it 
doesn t work, we will make it work at NO COST 
All you have to pay is the shipping We guaran- 
tee it 

WE WILL BUILD IT 

The TC-8 is available fully assembled for 
S99 95 plus shipping We ship assembled units 
3 weeks after we receive your order But truth- 
fully, with our 'CAN'T FAIL guarantee, we don t 
understand why you wouldn't rather do it your- 
self 

ORDER NOW 

To order your TC-8 kit. send your check or 
money order for $69.95 plus S3 50 postage and 
handling to JPC PRODUCTS CO 12021 
Paisano Ct . Albuquerque. NM 87112 (New 
Mexico residents add 4° sales tax) Credit card 
orders accepted by phone or mail Personal 
checks will delay shipment. We will otherwise 
immediately ship you the TC-8 kit. the cabinet, 
the ribbon cable, the power adapter, an instruc- 
tion manual, and a cassette containing the 
software 

At the present time, the only version of the 
TC-8 available is for 1 6K LEVEL II SYSTEMS 



iyjpc pi 
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PRODUCTS CO. 
Phone (505) 294-4623 
12021 Paisano Ct. 
Albuquerque, N.M. 87112 



*- Reader Service - see page 162 
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GENERAL 



Two versions of a "stripped down" Pascal for your 80. 



Pascal I & 1 1 



Fred Monsour 
309 Camellia Drive 
Charlottesville, VA 22903 



Has programming in BASIC lost its chal- 
lenge? Are you ready to try something 
new, but without the headaches of assembly 
language? 

If you haven't considered Pascal, now is the 
time. There are at least three Pascal software 
packages available. The first release from the 
FMG Corporation is a powerful tool, but its 
price, $150 for the complete system — $100 
without its assembler, linker and library — is 
steep for those who are merely curious. 

Even more restrictive is FMG's 48K RAM re- 
quirement and at least two disk drives. 

The other two systems are People's Pascal I 
and People's Pascal II, both marketed through 
the Computer Information Exchange, Inc. 
(Box 158, San Luis Rey, CA 92068), and 
somewhat more affordable at $15 and $23. 
Though only a subset of full Pascal (these 
systems are to Pascal what Tiny BASIC is to 
Level II), there's enough to be interesting, fun 
and perhaps even useful. 

To use People's Pascal: load the editor/com- 
piler and either type in or load from tape a pro- 
gram; compile P-code; optionally run and 
debug the program using the interpreter; 
translate P-code to Z80 code; load run-time 
system; optionally load T-BUG (not supplied) 
and save Z80 code and run-time routines on 
tape; run program. 

Editor/Compiler 

Depending on line length, the editor/com- 
piler can handle 50 to 200 lines of Pascal source 
text at a time. Larger files can be created, edited 
and compiled by saving portions of the large 
file on tape as the text buffer is filled. Source 
text of indefinite length can be handled in this 



way since the compiler alternately reads from 
the source tape and writes to the object 
(P-code) tape. 

All actions required of the user are prompt- 
ed. The compiler is set up for use with one cas- 
sette recorder, but it can be easily modified to 
work with two (see Example 1). This eliminates 
having to switch source and object tapes back 
and forth manually during compilation. Edi- 
tor/compiler commands are: 

F(nte): Give number of bytes left in text buffer 
L(isl) List line(s) of text on screen. 
Ptriot): List lincts) of text on printer 
[Xcteici Delete line(s) of text from buffer. 
Slumber): Renumber lines of text. 
Rlead): Read biock(s) of text from tape. 
W(rile): Write hnets) of text to tape. 
Hot): Write end-of-file mark to tape 
CiompHt): Compile program in text buffer. 

As the compiler reads the source code from 
the text buffer and/or cassette files, it produces 
an intermediate code, called P-code, which is 
later translated into Z80 machine code. During 
compilation the source and object code are 
displayed on the video monitor, and the object 
code is written to tape. 

Compiler options include output to line 
printer and compilation without generation of 
an object file. The latter is used to quickly 
check for syntax errors before the object code is 
written to tape. If an error is found the com- 
piler not only gives a message, but points to the 
faulty section. 



Line 193: Change PRINT 1-1 to PRINT #-2 

Line 234: Change "WRITE CASI" 

to "WRITE CAS2" 

Line 235: Change PRINT *-l to PRINT 1-2 

Example I. Modifications to 
editor/compiler to allow using two 
cassette recorders. 



P-code Interpreter 

Once the compiled P-code is on tape, it can 
be either translated into Z80 code or executed 
via the interpreter which, like the editor/com- 
piler and the translator, is written in BASIC. 
While the interpreter is extremely slow because 
of its double level of interpretation (P-code to 
BASIC to Z80 code), this effect is useful for 
debugging a program . 

In addition, commands are provided for 
controlling and analyzing program execution. 
These are: 

R: Run program 

S: Single-step execution of program. 

G: Go to and execute next program instruction 

X: Display counters, registers and pointers. 

T: Trace through last few P-codes executed. 

K: Display specified stack locations. 

B: Set breakpoint(s). 

C: Clear all breakpoints. 

V: Display all breakpoint locations. 

E: Examine specified P-code locations 

V Examine next P-code location 

L: Examine previous P-code location 

Q: Quit interpreter. 

While understanding the workings of the 
Pascal P-machine is necessary to use some of 
these commands properly, the interpreter can 
still be of value without knowledge of the 
P-machine's complexities. 

Once you're satisfied that the P-code is cor- 
rect, with or without debugging on the inter- 
preter, the translator then gives your program 
its final form — Z80 code. After a short initial- 
ization dialogue, the translator reads the 
P-code from tape and begins the conversion. 
The P-codes and corresponding Z80 codes will 
be optionally listed on the video monitor 
and/or the printer. 

At the end of translation, the start and end 
addresses of the Z80 code and the Z80/P-code 
ratio are displayed. One nice feature of the 
translator is that conversion can be customized 
for speed or for size. A program at optimal 
speed runs about twice as fast and requires 
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TRS-80 ™ Super Version #1 



Why limit yourself to Radio Shack* BASIC or spend 
ireds of dollars on new programs and lan- 
guages? 

Through the phone lines, your TRS-80 "* becomes a 
sophisticated and powerful computer Access new 
languages, make vital decisions based on stock 
quote, earn money selling those top notch pro- 
grams you wi 

Two services, MicroNet" and The Source" open 
the ! o the 80 user. Pick the group for your 
needs or bell ! 

MicroNet 
Hookup S9.0C 

Perhou- S5.0C 

The Source 

Hookup $100.00 

Per hour ■ • $ 2.75 



These charges are billed tc i ister Charge or 

VISA. 

Houston Micro Computer Technologies, Inc. otters 
you three packages to choose from: 

Package I (ST80ID Acccustic Modem, RS232C) with: 
MicroNet •• $460. 

The Source K40. 

Both S545. 

Package II (ST8CI. Accoustic Modem. RS232C) with: 

MicroNet $400 

The Source < 

Boll. WB5. 

Package HI for Mod II ( HMCTERM . Accoustic 
Modem. Cable) 

MicroNet BOO. 

' I . . . i ■ •« . . : " ' 

Both $585. 



ST-8C 1 (S25.0C) 
Set Serial Board 
Keyboard 
t e Feed 
Line Prr i 



ST 80 II ($35.00) ST 80 in ($150.00) 

Dump Memory to Disk Help Command 

Allow Lower Cai -nate 

Tran-i Logon Sv. I us 

rnit Buiier to Serial: Out Port Warm Program Re 

Sen-i I Memory hb l 



I1H:JTERM ($200.00) 
Converts TRS-80 Mo 
to Complete Intelhg*- 
Terminal for Processing 

mes 



lb order by phone or for local dealer information call: 713/661-2005 
Texas residents add 6% sales tax • MasterCharge • Visa 

HOUSTON MICRO-COMPUTER TECHNOLOGIES, INC 



Home and Business Computer Specialists 
5313 BISSONNET ■ BELLAIRE • TEXAS » 77401 • 713/661-2005 
Dealer inquiries invited. 
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(• UNLIMITED PRECISION DIVISION IN PASCAL •) 

(• AFTER A BASIC PROGRAM BY JEF RASKIN. BYTE, FEB '79 •) 

CONST DECIMALPOINT = 46 (• ASCII VALUE •); 

VAR DIVDEND, DIVISOR. QUOTIENT, PRECISION: INTEGER; 

BEGIN; 

READ (DIVDEND*. DIVISOR*, PRECISION*); 
QUOTIENT : = DIVDEND DIV DIVISOR; 
WRITE (QUOTIENT = . DECIMALPOINT); 
REPEAT; 
DIVDEND:- (DIVDEND --QUOTIENT'DI VISOR) • 10; 
QUOTIENT : =- DIVDEND DIV DIVISOR; 
WRITE (QUOTIENT*); 
PRECISION := PRECISION - I; 
UNTIL PRECISION = 0: 
END. 

Program Listing I: Pascal program demonstrating unlimited precision division. 



about twice as much memory as one designed 
for size. In a 16K system, roughly 9.5K bytes of 
Z80 code can be accommodated. 

Run-time Routines 

Okay, now you have the final product, right? 
Not exactly. 

Have you included keyboard scanning, video 
output, 16 bit arithmetic routines, etc., in your 
Pascal program? No? Well don't despair. The 
authors of People's Pascal I have taken care of 
them for you. All you have to do is load these 
run-time routines from tape via the Level II 
SYSTEM command. They, too, are written in 
assembly language for easy modification. 

When the run-time routines (about I.4K 
bytes) are loaded the program is ready to go. 
Before you run it, however, it's a good idea to 
save a copy of the program/run-time system on 
tape. This is easily done using T-BUG or any 
similar monitor. The final product can then be 
loaded and run without any other Pascal 1 soft- 



ware present. 

In fact, by modifying two calls to Level II 
character input and output routines, the pro- 
gram should be compatible with any other Z80 
microcomputer (assuming RAM is available in 
the correct locations). 

People's Pascal II 

People's Pascal II consists of three sections: 
the Monitor, which includes the run-time 
routines and P-code interpreter; the editor, 
which is used to enter and modify Tiny Pascal 
source code; and the compiler, which creates 
P-code from source. 

The three are loaded and used as one pro- 
gram via the Level II SYSTEM command, 
making Pascal II quicker and easier to use. 
There are actually two versions provided — one 
for 16K TRS-80s and one for 32K or more. Ex- 
cept for a potentially larger symbol table in the 
second version, they are essentially the same. 

After loading the 16K or 32K version with 



the SYSTEM command, type "/ (Enter)"; the 
monitor will respond with a sign-on message 
and a period, which is its command prompt. 
Monitor commands are: 

E: Enter nev. source Hie or edi! old one. 

C: Compile source file into P-code. 

C/-P: Compile bui don't generate P-code (for syntax check). 

C/'-S: Compile; OK to overwrite source if object size requires. 

R: Run compiled program 

R/'-C: Run program; overwrite Fditor & Compiler if necessary 

lXfilename> Load source from catsettc 

LP<fitename>: Load P-code from ca-ssctle. 

WS<filename>: Write source file to cassette. 

WP<filename> Write P-code file to cassette 

The editor does not use line numbers, but 
maintains a pointer to the current line on which 
the editing commands operate. These com- 
mands list to video monitor; scroll up or down; 
delete; insert; replace and extend one or more 
lines. A maximum of 600 lines of text is permit- 
ted, each no longer than 130 characters. 

Once the Pascal source code is complete, 
return to the monitor, type "C" and watch 
your video screen. The text is listed as it is com- 
piled — about one line per second. Syntax errors 
generate a code number and an automatic re- 
turn to the monitor. 

Before running the program, you may want 
to save the source file on tape as insurance 
against software explosions. After it runs to 
your satisfaction you can save the P-code, 
which will load and execute without compila- 
tion. 

If you have at least 36K of RAM you can 
compile or modify the Pascal source code. 

Tiny Pascal Language 

Tiny Pascal handles only (wo date types — in- 
tegers and one-dimensional integer arrays. This 
Continue to 42 



WHY LOWERCASE? 



Unfortunately, 



re* :r'l af*»t<l*t« ju*t how K Cliff *«lc«M II on tour 
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this i» i*nl YOU can h*ut. 

i . -»^v-»-*«***yi-a''8fl«B • *ra •*♦.-. •I?**. 1 **' • " 
*UXDEF&XI jWJWWSTUVwrrt***. '*Bo*tf»i jklonoJ^ftuwrJttiiiT 



IC. to will of far on* to our 
•» • t a Pa r *t* aodi'icatiorv if tl 



Wouldn't you like access to YOUR entire typeset? Level II Basic con- 
verts lowercase command words into UPPERCASE. All characters 
contained between quotes remain as typed, but the software in an un- 
converted TRS-B0 allows UPPERCASE display only! This software 
shortcut allowed Tandy to omit one video memory chip. This chip 
must be added and the video software repaired before the display of 
dualcase is possible. 



converting your TRS-80 requires installing the video memory chip plus wir- 
ing changes There is only one modification on the market which eliminates most of the wiring. 
To get the dualcase mod installed you have three choices I) Send your computer to 
a company or individual who will do the wiring. 2) do it yourself, or 3) "THE PATCH' 
(trade mark) 

To make choices 1 4 2 operate requires using software overhead in the form of a "driver" This 
takes 30 bytes, unless you want a 'normal" shift to UPPERCASE keyboard That takes upwards 
of 60 more bytes. Software oriented mods have three more disadvantages 1) They reside in 
program memory, eating program space which you could be using. 2) other machine language 
programs are unusable if they are loaded against the top of memory, or 3| the driver software MUST 
be loaded every time you power up. or the "MEMORY SIZE?" appears due to program bomb. Choice 
number three suffers from NONE of the software overhead problems We call it "THE PATCH ' and it's 
new for the 80's! 

"THE PATCH", a small electronic module which plugs into the unused ROM socket on Level II 
machines, makes necessary software changes to ROM supporting lowercase, an optional block cur- 
sor, & extra keyboard debounce. Electronically means NO software overhead Your computer 
displays lowercase instantly upon power-up, and the keyboard operates in "normal' typewriter 
fashion 

"THE PATCH" is completely compatible with your TRS-80 since it is the first, and only, TRS-80 
lowercase system designed that flawlessly mates with the computer as a unit, not |ust a special pro- 
gram package. 

"THE PATCH" is also the only modification of any kind which can have extra options and updates 
factory installed for 5 to 10 dollars per option, as they are available Same day turnaround 

Order yours today to avoid extra delay. Send $59.97 + 2.50 for S&H to: CECDAT "THE PATCH" / Box 
8963 / Moscow. ID 83843. 
THE PATCH is a trademark of CECDAT, Inc. *" 1»5 
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the electric pencil II 



1980 Michael Shrayer 



TM 



is now available 
for the TRS-80 Model IT Computer 

Standard Printer Version $275 
SERIAL DIABLO, QUME and NEC Printer versions $300 



Features 

• CP/M compatible only 

• Supports four disk drives 

• Dynamic print formatting 

• DIABLO and NEC printer packages 

• Multi-column formatting in one pass 

• Print value chaining 

• Page-at-a-time scrolling 

• Bidirectional multispeed scrolling controls 

• Substystem with print value scoreboard 

• Automatic word and record number tally 

• Full margin control 

• End-of-page control 

• Non-printing text commenting 

• Line and paragraph indentation 

• Centering 

• Underlining 

• Bold face 



1 LOVEW 

EUECTWZ 
PENCIL 





The Electric Pencil II is a Character Oriented Word 
Processing System. This means that text is entered as a 
string of continuous characters and is manipulated as 
such. This allows the user enormous freedom and ease in 
the movement and handling of text. Since line endings 
are never delineated, any number of characters, words, 
lines or paragraph may be inserted or deleted anywhere 
in the text. The entirety of the text shifts and opens up or 
closes as needed in full view of the user. The typing of 
carriage returns or word hyphenations is not required 
since lines of text are formatted automatically. 

As text is typed and the end of the line is reached, a 
partially completed word is shifted to the beginning of the 
following line. Whenever text is inserted or deleted, 
existing text is pushed down or pulled up in a wrap 
around fashion. Everything appears on the video display 
as it occurs, which eliminates guesswork. Text may be 
reviewed at will by variable speed scrolling both in the 
forward and reverse direction. By using 

the search or search and replace functions, 
any string of characters may be located 
and/or replaced with any other string of 
characters as desired. 



•TRS-80 is a product of Radio Shack, 
Div. of Tandy Corporation. 



Demand a demo from your dealer! 



^255 




MICHAEL SHRAYER SOFTWARE, INC. 

1198 Los Robles Dr. 

Palm Springs, CA. 92262 

(714)323-1400 



►» Reader Service — see page 162 
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is its greatest limitation. However, these con- 
straints can be overcome, as users of Tiny 
BASIC and integer FORTH may have found. 
One very simple example is given in Program 
Listing 1. 

Valid Tiny Pascal statements include: assign- 
ment of variables and constants; definition of 
procedures and functions; conditionals (IF . . . 
THEN . . . ELSE, CASE); repetitives 
(WHILE . . . DO, REPEAT . . . UNTIL, 
FOR .. . TO . . . DO, FOR . . . DOWNTO 
. . . DO); READ; WRITE; compound state- 
ments of any of the above. 

Not provided are label definition, GOTO, 
READLN and WRITELN. Procedure and 
function parameters are passed only by value. 
There is no record or file-handling capability. 

Additional features access memory (like 
BASIC'S PEEK and POKE), use machine lan- 
guage code (like USR or CALL) and allow 
hexadecimal constants, "else" branches on 
CASE statements, logical operations and print- 
ing (but not manipulation) of character strings. 

Pascal I permits one compiler directive, 
SINCL. When encountered in a Pascal source 
text, it instructs the compiler to read a source 
file from tape and insert it into the text at that 
point. A library of procedures and functions 
can be developed and reused in this way. In 
fact, the authors of Pascal I provide the foun- 
dation for such a library: PASLIB. It contains 
the routines SET (for graphics), AT (for cursor 
positioning) and RND (for random number 
generation). 

Pascal II also has several extra features, all 
built into its compiler: 

AK (X): Absolute value of x. 
SQR ( X) Square of X. 
INF (X): Value of input port X. 
OUTF (X.A): Outputs A to port X 
INKEY: As used in Level II BASIC. 



PLOT (X.Y.A): Turns graphics point at X. Y on if A odd. off if 
A even. 

POINT (X,Y): Returns 1 if point at X.Y on, if off. 
MOVE (B,A,N): Moves memory block of N bytes from A to B. 



Conclusion 

Pascal I and II each has its own merits and 
shortcomings. Pascsl I offers greater versatility 
when creating source code. It has error mes- 
sages and a pointer rather than code numbers, 
output to printer, an interpreter and the SINCL 
directive. 

On the other hand, Pascal 1 requires the 
loading of at least three fairly long programs 
from cassette and runs slowly since it's in 
BASIC. It can't be put on disk because the 
PEEKS and POKES conflict with DOS 
BASIC. 

Pascal II, however, can be, via NEWDOS' 
LMOFFSET or something similar (TRSDOS 
users see Allan J. Domurct's articles in 
Microcomputing (Oct. & Nov. 1979). 

Pascal I has the RND and AT functions; 
Pascal II has ABS, SQR, INP, OUTP, IN- 
KEY, POINT, and MOVE. Each of these can 



be created in Pascal or through a machine 
language call if necessary, but it takes a bit of 
work. 

Since each system has certain advantages, it 
would be nice to use both for programming. 
Unfortunately, the source and P-code tape for- 
mat of each system is incompatible with that of 
the other. 

The two systems also differ in their final 
products. Programs written on the Pascal I 
system require only a small run-time unit, are 
more portable and are transferable to other Z80 
computers with little effort. Pascal II programs 
run only on the Pascal II system. 

Finally, Pascal I produces Z80 code, which 
runs significantly faster than the P-codc and in- 
terpreter combination of Pascal II (see Pro- 
gram Listing 2). 

Whichever you choose, one of these systems 
is definitely worth trying, if only to see first 
hand why Pascal has created such a stir. Tiny 
Pascal probably won't displace BASIC as your 
80's native language, but it might satisfy your 
appetite for something new and set you think- 
ing about that Big Pascal yet to corneal 



10 DEFINT I, X. Y, Z 


VAR 1, X, Y. Z: INTEGER; 


20 FOR 1 - 1 TO 10000 


BEGIN 


30 X = 500: Y-7:Z-X»Y 


FOR I : = 1 TO 10000 DO BEGltf; 


40 NEXT 1 


X: = 500; Y: - 7; Z: - X«Y; 


50 PRINT Z 


END; 


WEND 


WRITE (Zl); 




END. 


Level II BASIC: Programming time = 1 nun.; running time * 2 min 20 sec. 


Pascal 1 : Programming time = 


14.5 nun., running time - 9 sec. 


Pascal II: Programming lime = 


1.5 min.; running time = 23 sec. 


Program Listing 2: BA SIC and Pascal benchmark programs and comparison of program 


development and running times. 






These popular, professionally developed 
applications are low-priced. Guaranteed 
performance I Detailed booklet Included. 



BUDGET %, INVESTMENT 


$17.95 


BUDGET & CHECKING 


$1<«.95 


HOME INFO RETRIEVAL 


111.95 


MATH (ages 5 and up) 


1 7.95 


STOCK PORTFOLIO 


$18.95 


AUTOMOBILE 


$12.95 


MASTERMIND game 


$10.95 


K0NTE CARLO game 


« 7.95 


and others from 


1 i».95 



Send order, or $1.00 for descriptive 
catalogue (free with order) to: »^116 

NEWBV SOFTWARE DEVELOPMENT CO 
2*9 OAWLISH AVE TORONTO. CANADA M4N 1 J6 



For Canadians 
* OwnersT^ 

Lower Case Modification . . $65.00 
Cassette Load Modification . $20.00 
Radio Shack Numeric Keyboard 

Installation $50.00 

(You supply numeric pad) 

RS232C Serial 1/0 Port for Printer 
etc. (Complete with connectors) 
For Use With or Without Expansion 
Box $169.95 

For a complete catalog and credit 
vouchers worth $25.00 on future 
purchases send $5.00 to: 

Ml Quote* In OsMafbM Am* 

ORTHON asass? 



• 108 



12411 Stony Plain Rd., 
Edmonton. Alta, T5N 3N3 



5 COMPLETE STORES IN ONE! 

COMPUTER CENTER 



features a complete line of 

SOFTWARE 
and BOOKS 

for the 

TRS-80 

write for information ^222 
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we don't say our programs are good — 

SPACE battles — h ig h -speed graphics (machine language sub-routines), you are the commander of 
a small mercenary star-cruiser . You have been hired to destroy a fleet of alien invaders, if you sur- 
vive, you will be handsomely rewarded; if you lose, you re dead cass / $14.95 disk / $19.95 
RHAt APPROACH — Land a multi-engine jet. Runway and instruments are displayed on 
the screen. Take control and try to land her yourself. Special $7.50 
level IV GRAPHICS — A machine language program that allows you to turn your 
keyboard into a Graphics Keyboard, no hardware modifications required to 
run this program, cassette no. compatible with Disk basic. cass./$14.95 

Disk /NfWDOS (not supplied) $19.95 
TOUCH TYPR4G I AND H — a two cassette package. Touch Typing I 
helps you learn the keyboard, reinforcing the correct finger- 
key positions. Touch Typing ll randomly choses words to 
help you improve your typing skills. These drills can be 
timed or untimed. cass./ $22.50 * 
SUPER ADO — (ages 5 to adult) improvesand teaches 
addition skills. Divided into three categories 
with a total of 36 learning modules. A game 
can be added as a positive reinforce 
ment tool, cass./ $24.95 
super mult — (ages 8 to adult) 
Contains 25 learning modules 



SEND 

50* for 
our new 
catalog! 



to learn and improve mul- 
tiplication facts. Prob- 
lems can be timed a**^ 
or untimed. ^ 

/ - 



LEVEL IV GRAPHICS - 

"if you write programs 
using graphics, this tape is a 
must . . . Excellent program. — 
80 Software Critique, issue 12 • 
super utility program . . . excellent 
value — a real contribution 80-Micro- 
computing, February 1980 
TOUCH TYPRK l * M — Our recommendation is to 
buy both programs if you are serious about im- 
proving your performance keying computer programs 
— 80 Software Critique, issue 12. 
SUPER MULT — very comprehensive multiplication program 
suitable for use by students just learning the multiplication 
tables and for adults that need some brushing up — 80 Software 
Critique, issue 12 
rnal APPROACH — One of the more interesting games before long 
you'll develop a strategy . . and end up with nicely done — you CREASED it ON! 
— Creative computing, January 1980. 
SPACE BATTLE — The unique value of Space Battle lies in the extra dimensions of the 
game . What is tough is staying alive ... in short, this is a challenging game with a lot of fac- 
tors to create interest . one of the best space war games available - 80-us, Mar/ Apr 1980 



Add $1.50 for shipping. 



Others say It for us! 



TRS-80 



AFTER THE REST. TRY THE BEST 



INVADERS 



WITH 
SOUND 



TRS-80 



"Alien INVADERS from deep space are now approaching our planet in 
great swarms to colonize on Earth. The invaders feel they must destroy all 
life forms . . ." 
This MACHINE LANGUAGE Arcade Game will be the best in your library! 

ONLY $14.95 Cassette 

from 

LEVEL IV PRODUCTS, INC 

Michigan (313) 525-6200 
Outside Michigan 1-800-521-3305 



32238 Schoolcraft, Suite F4, Room C . Uvonia, Ml 48154 „ M 

•SEND FOR THE LATEST RK CATALOG • OVER 250 DIFFERENT ITEMS IN STOCK FOR THE TRSSO ' 
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GENERAL 

Faster than a speeding interpreter, this BASIC 
program compiles your efforts into assembly language. 




1 

1 


TINYCOMP 

David Bohlke 
Coggon, IA 52218 

^K7hen I first began using some 
Y ▼ machine language routines, their speed 
eally impressed me. But because I'm mostly in- 
erested in BASIC, I thought it might be good 


500 with the compiler program. compiled, with several variations (see Table 1). 

Machine code is POKEd beginning at loca- In general, TINYCOMP PEEKs through the 
ion 30000. The only table used begins at 32650 BASIC program one line at a time and bran- 
and is used to store the variables (A-Z, scratch) ches to various subroutines that select the 
which TINYCOMP processes. machine code tokens to be POKEd (see Table 

There arc only five statements that can be 3). 


i 

I 
I 


•xperience to write a BASIC compiler. 

My system is a Level 11 TRS-80 with 16K; 
ind TINYCOMP 1.0 is just a beginning. 

The actual TINYCOMP program extends 
rom line 800 to line 3800 in the listing. The 
program to be compiled should be numbered 
jet ween 1 and 500. Since an END statement is 
equired, it is a good idea just to record it at line 




TINYCOMP Listing 

10 A=1:C-65:D=1024:E«91 

20 B=0 

30 PRINT@B,CHR$(C) ; 

40 B=B+A 

50 IFB-DTHEN70 

60 GOTO30 

70 OC+A 

80 IFC=ETHEN99 

90 GOTO20 

99 END 

500 END 

800 POKEM, P : PRINTP ; : M=M+1 : RETURN 

805 P=PEEK(Q) :Q=Q+1:IFP=32THEN805ELSEIFP=0THENC*2 

807 RETURN 

810 IFP<65ORP>90THEN815ELSERETURN 

815 PRINT: PRINT "ERROR LINE •" ;Ll (L-1) :END 

820 IFP<480RP>57THENRETURN 

822 C$«C$+CHR$(P) :GOSUB805:GOTO820 

830 C$*"":GOSUB820:IFC$=""THENC1=-1:RETURN 

832 C1»VAL(C$) 

834 Dl=Cl/256 :E1=C1-D1*256 :RETURN 

850 PRINT00, "TINYCOMP 1.0 DAVID BOHLKE COGGON, IA":RETURN 

900 P=42 :GOSUB800:GOSUB990 :GOSUB800 :P-Pl :GOSUB800 : RETURN 

905 P=22:GOSUB800:P=Dl:GOSUB800:P=30:GOSUB800:P=El:GOSUB800: RETURN 

910 P-25:GOSUB800:RETURN 

915 P-115:GOSUB800: RETURN 

920 P-235:GOSUB800: RETURN 

925 P=34 : GOSUB800 : GOSUB990 : GOSUB800 : P-Pl : GOSUB800 : RETURN 

930 P-195 

932 GOSUB800:P=E1:GOSUB800:P«D1:GOSUB800: RETURN 

935 P-183:GOSUB800:P«237:GOSUB800:P«82:GOSUB800:RETURN 

945 P« 32 :GOSUB800:P«JR:GOSUB800: RETURN 

950 P-201:GOSUB800 .'RETURN 

960 P=225:GOSUB800:P=233:GOSUB800: RETURN 

965 P«213:GOSUB800: RETURN 

990 P-VT+V1*2-INT ( ( VT+V1*2 ) /256 ) *256 : Pl« ( VT+V1*2 ) /256 : RETURN 

1000 DEFINTA-Z:DIM Ll (50) ,L2 (50) 

1010 Q*17129:L-1:VT-32650:M-30000:CLS 

1020 MI-PEEK (Q) +PEEK (Q+l )*256:L1(L) -PEEK (Q+2)+PEEK (Q+3 )*256 

1030 GOSUB850 

1040 PRINT :PRINT§960,Ll(L) ;M; " : " ; :L2 (L) «M:L«L+1 :Q-Q+4 

1045 IFL1 (L-1)>500THEN1220 

1050 C-0:GOSUB805:IFC-2THEN1050 

1090 IFP>64ANDP<91THENQ=Q-1 :GOSUB2000 

1100 IFP-140GOSUB2000ELSEIFP-17 8GOSUB2500 

1110 IFP=141GOSUB3500ELSEIFP=143GOSUB300 

1120 IFP-145GOSUB3700ELSEIFP-146GOSUB3800 

1190 IFP-128GOSUB950 






10A = I:B = 0:C I91:D= 1024 

20PRINT@B.CHRS(C); 

25 GOSUB 300 

30B^B+A 

40 1KB D THEN 99 

50 GOTO 20 

MEND 

300X»0:Y = 30 

3I0X = X+A 

320 IF X-Y THEN 340 

330 GOTO 310 

340 RETURN 

Sample Program 1 
















A.B.C represent any of the legal 

variables, A-Z 
nnn musl be a positive integer 
LET A - nnn LET is optional 
LET A ■ B * C subtraction also supported 
LET A ■ B 

PRINTigA.CHR$<B): semicolon optional 
GOTO nnn 

IF A = B THEN nnn = is only test 
END must have 
GOSUB nnn 
RETURN 

NOTE: only LET (assignment) statements should be 
used on multiple statement lines. 

Table /. TINYCOMP Syntax 
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1195 IFPEEK(Q-1)«58THEN1050 

1200 Q-Ml: PRINT :GOTO1020 

1220 GOSUB850:PRINT§960, "ADJUSTING JUMP'S . . . " ; 

1250 PORI«30000TOM:IP-PEEK(I) : IFIPO195THEN1290 

1260 DN-PEEK(I+l)+256*PEEK(I+2) :DH-0 

1262 F0RJ«1T0L:IPDN-L1(J)THENDH-L2(J) :PRINTL1(J) ; 

1264 NEXT:IFDH»0PRINT" L N F -" ;DN:GOTO1290 

1270 MB«DH/256:LB«DH-MB*256:POKE(I+l) ,LB:P0KE(I+2) ,MB 

1290 NEXT:PRINT 

1300 POKE16526,48:POKE16527,117 

1302 GOSUB850:PRINT§960, ""; 

1305 INPUT"<ENTER> TO -RUN- MACHINE CODE . . .";A$:CLS 

1310 X=USR(0) 

1333 GOT01333 

2000 GOSUB805tGOSUB810: Vl-P-64 :GOSUB805:IFPO213THEN815 

2010 GOSUB805:GOSUB830:IFC1 — 1THEN2100 

2020 GOSUB905:GOSUB920:GOTO2150 

2100 V2-P-64:GOSUB805 

2110 IFP-205ORP-206THEN2300 

2120 V4-V1:V1-V2:GOSUB900:V1-V4 

2150 GOSUB925: RETURN 

2300 SG»P:GOSUB805:GOSUB810:V3-P-64:V4-V1 

2310 V1-V3:GOSUB900:GOSUB920:V1-V2:GOSUB900:V1-V4 

2320 IFSG»206GOSUB935:GOTO2150 

2330 GOSUB910:GOTO2150 

2500 GOSUB805 : GOSUB805 :GOSUB810 : Vl-P-64 :GOSUB805 :GOSUB805 

2510 IFPO247THEN815ELSEGOSUB805:GOSUB805:GOSUB810:V2«P-64 

2520 GOSUB90 : Dl-60 : El-0 : GOSUB905 : GOSUB91 : V1-V2 

2530 GOSUB920:GOSUB900:GOSUB920:GOSUB915: RETURN 

3000 GOSUB805:GOSUB810: Vl-P-64 :GOSUB805 : IFP0213THEN815 

3010 GOSUB805:GOSUB810:V2-P-64:GOSUB805:IFPO202THEN815 

3020 GOSUB805:GOSUB830:IFCK0ORC1>500THEN815 

3030 V4-V1:V1«V2:GOSUB900:V1-V4:GOSUB920:GOSUB900 

304 GOSUB935:JR«3:GOSUB945:GOSUB930: RETURN 

3500 GOSUB805:GOSUB830:IFCK0ORC1>500THEN815 

3510 GOSUB930: RETURN 

3700 GOSUB805:GOSUB830:IFCK1ORC1>500THEN815 

3710 D2-D1:E2-E1:C1-M+8:GOSUB834:GOSUB905:GOSUB965 

3720 Dl«D2:El»E2:GOSUB930:RETURN 

3800 GOSUB960: RETURN 



I have to apologize to devoted T-BUG users 
for the inefficient codes used, but I have never 
actually written a machine language program. 
Rather, I just used the codes I felt I could con- 
trol. 

Execution 

To begin, protect high memory for the 
machine code and variable table by answering 
MEMORY SIZE? with 30000. This permits 
about 2600 bytes for the compiled machine 
language program. 



O 


beginning ot BASIC line lo be com- 




piled 


L 


line being compiled 


VT 


beginning address of variable (able 


M 


current location (30000 * ) to POKE 




machine code 


Ml 


beginning of next BASIC line to be 




compiled 


L1(L) 


decimal number of compiled line 


L2(L) 


M location corresponding to Level 




KM 


C.CI.SG 


flags 


P 


PEEK value for corresponding M 


VI, V2 


C'HRS values of legal variables in line 




being compiled 


DI.EI 


absolute values for loads, jumps 




Table 2. Variable List 



Line numbers 10-99 contain a sample pro- 
gram to be compiled. You can key them in with 
TINYCOMP. After the program is entered, 
you should still have over 10000 bytes remain- 
ing (for TINYCOMP 2.0?). 

Be sure to issue a CS AVE before you attempt 
to run TINYCOMP. 

When you type RUN, the sample program is 
executed in BASIC. This enables you to check 
for any syntax errors. To compile the sample 
program, type RUN 1000. 

During execution the decimal line number, 
the beginning memory location of the machine 
code line to be compiled, and the POKEd 
machine code tokens are printed. This takes on- 
ly a few seconds for the sample program. You 
can now execute the compiled program by 
pressing ENTER when the prompt appears. 
The sample program will fill the screen with all 
A's, B's, C's through Z's. What took about 520 
seconds for the BASIC program, takes only 3.2 
seconds in the compiled machine code! That's 
roughly 160 times faster. They use about the 
same memory, a little over 1 1 1 bytes. 

I provided another sample program to 
demonstrate the GOSUB command (see Sam- 
ple Program 1). The coding paints the screen 
white, and employs a timing delay in the 
routine at line 300. By altering the variable Y in 
line 300 you can change the execution speed. 



To exit the machine code, just press 
BREAK. (If you get stuck in an endless loop, 
press the RESET button.) To execute the 
machine language program without having to 
re-compile, type RUN 1300. 

Current Maximum 

Currently, the maximum number of lines 
which can be compiled is 50. This can be ad- 
justed by changing the DIM statement (L I and 
L II) in line 1000. 

Any TINYCOMP syntax errors are 
displayed as ERROR LINE # nn (see Table 1). 
There is no provision for CSAVEing or 
CLOADing the machine code, but the combin- 
ed BASIC programs (TINYCOMP and the 
sample program) can be saved and loaded as 
usual. 

Although there aren't a lot of practical ap- 
plications for a program that permits only five 
statements, I hope TINYCOMP 1.0 can be a 
learning experience for you as it has been for 
me. 

Some of the statements I would like to add 
are PRINT"STRING", PRINT a variable, 
INPUT. RND, and the SET and RESET. With 
over 10000 free bytes remaining, there should 
be sufficient memory to make the TINYCOMP 
statement set at least as large as Level 1 . 1 would 
appreciate any helpful suggestions. ■ 



800-832 


Krequently used subroutines 


800 


POKEs machine code in 30000 + 


805 


PEEKs Basic program 


810 


check for variable type 


815 


prints ERROR message 


820 


finds integer value of constant 


830 


check for constant type 


900-990 


Assembler codes lo be POKEd 


900 


LD HLlnnnn) 


905 


LD D nn ID E nn 


910 


ADD HL.DE 


915 


LD(HL).E 


920 


EXC HL.DE 


925 


LD(nnnn).HL 


930 


JPnn 


935 


OR A SBC HL.DE 


945 


JRNZ 


950 


RETURN (lor END) 


960 


POP HL JP(HL) 


965 


PUSH DE 


990 


computes (nnnn) for 900,925 


IOOO-I333 


Main control loop, steps through 




BASIC program 


1000-1010 


sets parameters 


1020-1045 


save decimal and POKE line numbers 


1050 


gets statement code 


1090-1200 


branch on statement codes 


1240-1290 


POKEs absolute addresses 




(GOTO.THEN. RETURN) 


1300-1333 


executes machine language program ' 


2000-2330 


compiles LET 


2500-2530 


compiles PRINT® 


3000-3040 


compiles IF . . . THEN 


3500-3510 


compiles GOTO 


3700-3800 


compiles GOSUB . . . RETURN 


Table 3. Line Description 
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GENERAL 

An outline of the 

commands for a new language. 



PUTN 



William O'Brien 
1 1 Dongan Place 
New York, NY 10040 

Higher level structured languages for the TRS-80 are in 
short supply for the serious programmer just now. Yes, 
of course, there is Microsoft's FORTRAN, but one must know 
the language thoroughly in order to use it. The need arises, 
therefore, for a high level language with simple instructions 
that allow a programmer to implement it immediately on his 
system. 

It is for this reason that I am proposing the use of the 
following structured statements, if anyone would care to 
compile the language along these guidelines. 

PUTN 

A High Level Command Language 



USER 



HELLO 
MEM? 



FOR . . WHEN ... DO 



IF... WHAT 



ON ERR, WHAT? 



SYSTEM RESPONSE 

OK... 

YOU'VE GOT ROOM (indicates a 
large area of user RAM). 
ITS A LITTLE CROWDED IN HERE 
(half of the available RAM is no 
longer available). 
NOT REALLY (very little RAM is 
available. The CPU will also re- 
spond with this when there is so 
little RAM available that it doesn't 
remember the question.), 
for all the possibilities suggested, 
when the value or conditions are 
as you wish them to be, do what- 
ever it is you want done. This is 
excellent for analog inputs. If. for 
instance, you see that you will be 
busy for the rest of the year and 
you want to be reminded when 
Christmas arrives. 
a conditional statement such that 
should the conditional occur, the 
CPU will advise you how to 
proceed. 

if an error occurs, print just what 
kind of an error it is and how to 
correct it. 



USER 



ON ERR.FIX! 



HUH? 



HOLD 



BACK 
VARLST 

IF FULL NO 



IDLE 



BACTOBUS 
READY? 



AIM 



FIRE? 



WHATDO 



CLOAD 



RCDR 



INTERERR 



SYSTEM RESPONSE 

for appliance operators who do 
not wish to be bothered with state- 
ment errors. The CPU is instructed 
to correct the error on its own. The 
importance of this instruction can 
not be over emphasized, 
should you receive an error mes- 
sage that you do not understand, 
the CPU will try to explain it more 
clearly. 

should the programmer find it nec- 
essary to leave for a while, this 
instruction allows the CPU to shut 
most of itself off in the interim. 
cancels HOLD. 

lists all variables not in use as 
of its implementation, 
when printing to screen this forces 
a stop should the screen become 
filled and start to scroll. Excel- 
lent for preventing eye strain, 
allows the processor to do what- 
ever it wants to for a while if the 
programmer wants to take a break, 
cancels IDLE. 

similar to HELLO, CPU responds 
with OK, notifying the programmer 
that it will accept instructions, 
for interfacing the TRS-80 with a 
Rockwell Computer, it provides 
the necessary output data, 
for emergency use only, should 
the programmer see smoke near 
the CPU or any of the peripherals, 
for the novice programmer, this in- 
struction allows the CPU to ex- 
plain its various capabilities, 
for the experienced programmer 
and novice alike. This loads a pro- 
gram from tape and causes an 
automatic Checksum error, 
causes the CPU to print what 
model tape recorder is on line, 
since this is an abstract choice, 
implements an intermittent error 
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I made the TRS-80' Into a serious computer. 
Now I've made the Model II Into a spectacular one. 



I'm Irwin Taranto, and I've helped almost a 
thousand businesses get their first computers up 
and running. 

I've done it primarily with the TRS-80, because it's 
a really elegant piece of hardware. Given the right 
programs, it can do substantially the same work as 
the traditional minicomputers that cost four times 
as much. 

I proved it with four on-line, interactive programs 
adapted from the genuine Osborne & Associates 
systems, originally designed for the $30,000 Wang 
computer. Then I added two of my own and made 
them all work on a $4000 TRS-80. 

Now I've done the same thing for the new TRS-80 
Model II. It's an $8000 computer that works twice as 
fast and has four times the memory — up to two 
million characters. 

My new systems are fully documented, and 
because I'm working with a much more powerful 
computer, they're a night-and-day advance over the 
Model I programs. They'll turn your Model II into a 
complete business computer, set up and ready to go. 



THE TRS-80 MODEL II PROGRAMS 
General Ledger /Cash Journal: handles up to 7000 transactions 
on 500 different user-defined accounts. It keeps track of them by 
month, quarter and year, makes comparisons to the prior year, 
and does departmentalization. 

Account* P e yh le/Pur rh a e e Order: generates the purchase order 
and posts the item to payables when the goods are received. 
Invoice-linked, it calculates and prints checks and aged ledger 
reports and links fully to the general ledger. 
Account* Receivable/Invoicing: keeps track of billed and 
unbilled invoices, open and closed items, aging and service charge 
calculation. It prints statements, links to the general ledger, and 
can work within either an invoice- linked or balance- for ward 
accounting system 

Payroll/ Job Costing: computes regular, overtime and piecework 
pay, keeps employee files, figures taxes and deductions, prints 
checks, journal. 941-A and W-2 forms, and breaks out individual 
job costs. 



When I say set up and ready to go, I mean just 
that. If you're not quite sure on that point, call the 
number below and we'll give you the names of some 
of the people who've already bought all over the 
world. Call them up and hear what they have to say. 

These Model II programs are completely custom- 
tailored, which explains their $249.95 price. Before 
we'll send you a disk, you have to fill out a detailed 
questionnaire that tells us your precise business 
requirements. Then we send you the disk, all the 
instructions you need, and my phone number. If you 
call, we answer all your questions. If your questions 
are tough enough, I'll talk to you personally. 

Because that way I'll make sure that Model II of 
yours turns into a spectacular computer, just like 
I promised. 
I 1 

Please send me the custom questionnaires for the following 
$249.95 Model II programs 

] General Ledger/Cash Journal 
Accounts Payable/Purchase Order 
Accounts Receivable/Invoicing 
Payroll/Job Costing 

Please send me information on the TRS-80 Model I programs at 
$99.95 each 

Please send me information on other Taranto business programs 



Your name. 



Company name. 
Address 



City/State/Zip 



• 45 



Taranto 

& ASSOCIATES, INC. 



•A trademark of the Tandy Corporation 



* Reader Service — see page 762 
Scanned by Ira Goldklang - www.lrs-80.com 



PO Box 6073. 4136 Redwood Hwy . San Rafael CA 94903 • (41b) 472 2670 
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a USER 


SYSTEM RESPONSE 


USER SYSTEM RESPONSE a 




that disappears when the power is 


Shack peripherals that you should 




shut off (as is the case when tak- 


take out a loan. 




ing the CPU for repair of same). 


BYTECOUNT outputs how big a chunk of your W 


WAIT . . . 


this instruction should be used 


income is going toward the elec- 




just after ordering a Disk Drive 


tric bill. 




from the manufacturer. It disables 


ACTWAIT after inputting the waiting time 9 




all Disk Operating features for 


for a peripheral from Tandy, this 




five months thus eliminating 


function allows the CPU to cal- 




any chance of an L3 error. 


culate the actual time you should 9 


MNUL 


forces an output from the CPU, 


allot. 




causing it to print what the in- 


HANGUP utility that permits the CPU to 




struction manual really means or 


get hung up on a problem when- A 




should say, rather than what it 


ever the programmer invites a 




does say, since they are not al- 


friend over to see the wonderful 




ways the same. 


thing. A 


EDIT 


allows the CPU to scan the job 


LLIST a typo, ignore it. 




ads in The New York Times and 


ARITHMETIC OPERATORS 




list all journalism offerings. 




BACKUP! 


forces the CPU into an error rou- 


.ME. might be equal to .PE. is probably equal to 




tine when brought in for service to 


.GL. greater or less than .NE. not equal or equal to 




uphold your claim that it isn't 


.SC. similar or congruent to .AE. actually equal to ^ 




working right. 


.PS. perhaps the same .AD. addition operation ™ 


SORTMTPL 


CPU inputs the various answers 


.SU. integer subtraction .LD. long division 




given by various Radio Shack per- 


.SD. short division .DC. divide and conquer 




sonnel and sorts through them to 


.MU. an ancient island .SA. sequential addition W 




check for a possible valid answer 


(multiplication) 




among them. 


.Fl. forget it .WE. whichever is easier 


• FORMAT 


when writing a program for your 


.LA. lose the answer .MA. make up an answer W 




brother Matthew, it allows the 


.NY. new york JC. impossible to compute 




CPU to insert his name in the first 


.WC. inside and to the left .CT. compared to 




REM statement (this will not work 


As you can see, a command language utilizing the above in- ™ 




with other names). 


struction set would prove invaluable to the TRS-80 user, 


APPEN 


outputs instructions as to how an 


whether a neophyte or an experienced programmer. It ex- 




unprintable symbol might be 


plains the more mysterious aspects of the machine and the W 




written. 


complicated nature of its creators. If anyone has additional 


MERGE 


allows the CPU to notify you when 


statements they would like to add, feel free, this language is 




you've spent so much on Radio 


not protected by copyright. 1 hope you'll enjoy PUT-N.B 9 



DUSS EXTENDER for TRS-80 



TM 



ELCOMPCO Microcomputer Peripherals ^*H 

P.O. Box 6100, Albony, CA 94706 [ ' 

(415)846-7122 




Now you can hook up to four 
accessories to the TRS-80™ 
Buss with Active Buss Ter- 
mination to reduce Buss 
ringing and noise and in- 
crease reliability. 

INTRODUCTORY PRICE $95. 

TRS60™ BOfodemorkofTondyCofp 
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EXPAND YOUR SYSTEM, 




THE TERMCOM™ INTERFACE BOX IS THE 
MOST EFFICIENT UNIT OF ITS KIND. 



Your computer will gain communication capabilities by becoming an 
intelligent terminal. This capability was expensive. But now, TERMCOM™, 
the Intelligent Interface Box, is here! 

• You do not need an expansion TERMCOM™ FEATURES INCLUDE: 

interface •Paging 

• You do not need a separate serial u 
interface # Scrollina . 

• No additional software is needed # R eform ° tina 

• Provides post for serial printers * Dls P la V lock 

• Rugs directly into your computer # Man Y other attributes 

pR|CES . TERMCOM™ ALLOWS UTILIZATION OF: 

„i o «* <m „ooc • Inexpensive serial printers 

Box and Software $ 49.95 . ^ other RS . 232 device 

BOKOniy 51 29^5 fa easy t0 reaC j owner ' s manual is provided, 

SoftwareOnly $45.00 

Documentation Only $1 0.OO „ f « C [A TfflnA 

Box with Prom $169.95 ^ I* VI ^~^£r £ J 

v CORPORATION 

5758 Boicones Ove 3o*e2C2 

Voaem no? ncudea Prie»ssubtect to change Austin Texas 78735 51 2 451 -0221 



• Reader Service — see page 162 
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Cheap and simple word processing. 



BASIC Word Processor 



Delmer D. Hinhchs 
21 16 St. 377th Aw. 
Washouf-al WA 98671 



You do always think of better phrasing 
after you see your thoughts in print, don't 
you? 

A word processor for your computer lets you 
write letters and articles without typing a series 
of rough drafts. All of your typing revisions 
and editing are done on the video display. You 
produce a hard copy only after you are satisfied 
with the text. 

You can also save the text on cassette so that 
you can make additional corrections and/or 
hard copies at a later time. 

This BASIC word processor has the follow- 
ing features: 

1 . It accepts normal upper/lower case typing 
on an unmodified I6K Level II TRS-80. 

2. It is line-oriented. Every line of text has a 
line number, for reference. This number need 
not be printed. 

3. Editing is similar to Level II BASIC 
editing, except that the entire line is always visi- 
ble under a transparent cursor. 

4. You can change any of the ten variables to 
format for print or display. 

5. Words can be automatically moved be- 
tween lines to make all lines the correct format 
length. 

6. Lines of text can be deleted, inserted, 
replaced, or moved. 

7. Lines of text can be automatically right- 
justified. 

8. Up to 120 lines of text, nearly 5 pages, 
double-spaced, can be in memory at one time. 

Running the Program 

When the program is loaded and RUN is 
entered, a title and prompt, COMMAND?, 
arc displayed. The program will accept 17 
single-letter legal commands. These are: 



A ADD 


Add text at the end ot the text file. 


B BLANK 


hliminale blank line*, and renumber text 




file. 


C COMPILE 


Move words between lines in a specified 




block of lines to adjust lines to the cor- 




rect length. 


D DELETE 


Delete a specified block of lines. 



EEDIT 
F FORMAT 

H HELP 
I INSERT 

J JUSTIFY 

k Ml I 

L LOAD 
M MOVE 

P PRIM 
R REPLACE 
SSAVE 
V VIDEO 

\ I All 



Edit a specified line. 

Change the formal lor text display or 

printing. 

I ist the 17 valid commands. 

Insert new lines into the middle of the 

lexi. 

Right justify the text file. 

Eliminate the current text file, and start 

over. 

I«ad a text file from cassette tape. 

Move specified lines to a new location in 

text 

Print the text tile on the printer 

Replace a specified line with a new line. 

Record the text file on cassette tape. 

Display the text file on the video display 

nun 

Exit trom the program 



Now, let's examine these commands in 
detail. 

ADD. The final lines of the current text (if 
any) are displayed, and a flashing block cursor 
shows where text will be added. This command 
automatically turns on the line number display 
option. Text can now be typed continuously 
without having to ENTER each line. When the 
text file is filled, a FILE FULL message is 
shown. 



Subcommands in the ADD mode are: 

- Moves the cursor letl one position and erases the lasi 
character. 

Shift-— Erases the enure current line. 

— Moves the cursor five positions to the right, adding five 
spaces. 

Space bar moves the cursor one position to the right. 
ENTER Ends the line, and goes to the next line belorc the 
automatic cnd-of-line action. 

Shift- — Ends the line and moves the line text to the extreme 
right of the line. 

* Ends the line and leaves an end-ot page marker . the down ar- 
row, at the end of the line 

CLEAR Ends the line and leaves a do-not-)ustify marker, left 
arrow . at the end of the line. 

Shift 1 Ends the line, centers the line text and leaves a do-not- 
justify marker at the end of the line. 

Shift -ig twice Ends ADDtng text and returns to command 
mode. 

The first Shift® stops the program, and the second returns. 
Occasionally, only one Shift-® is needed. 

BLANK. All blank lines are eliminated from 
the text, and the line numbers are closed up. 
Note that blank lines are empty and this com- 
mand does not effect lines that contain only 
spaces. During operation, this command 
displays DELETING BLANK LINES; when 
done, it automatically displays the new text file 
using the VIDEO command. 

COMPILE. After editing or reformatting 
the text, some lines may be too long or too short 
to properly fit into the specified line length. 
This command shifts words between the lines 



of a specified block to get the best possible fit. 
COMPILE works in two stages: It first 
checks for lines that are too long and pushes 
any extra words onto the following line. It then 
checks if any line can accept words from the 
following line and pulls any possible words 
back onto the preceding line. COMPILE 
should be used on only one paragraph at a time, 
as ii left-justifies all lines except the first within 





A/rays 


AS<I20) 


tines of text 


X»3) 


Buffer text lines foe LOAD and SAVE 


S<20) 


Position to enter space for JUSTIFY 


T(20) 


Number of spaces to enter for JUSTIFY 




Variables 


AJ 


Input entry character 


BJ 


Blank to end ot line (ASCII 30) 


CS 


Cuisor (graphics character 143) 


FS 


Format siring for line number ("### ") 


HS 


Heading for each page 


LS 


1 eft part of text stung 


NS 


Line numbers? ("Y" or "N") 


PNS 


Page numbers? ("Y" or "N") 


PIS 


Print page no. for page no. 1? 






OS 


Number "n" string for EDIT subcom- 




mands 


RJ 


Right pan of text string 


ss 


Space character (" ") 


xs 


Temporary text manipulation string 


XVO) 


1 emporary text line siring for EDIT 


A 


ASCII value of text character 


B 


Beginning display line 


c 


Cursor position 


D 


Cursor displacement for wrap-around 




lines, Temporary cursor position 


F 


First line for COMPILE. DELETE, or 




MOVE. Found character flag for EDIT 




search (0,1) 


FL 


First line of text for VIDEO or PRINT 


FP 


lust page number to be listed 


1 


Multi-use Integer counter 


IT 


Insert text flag for INSERT (0 or 1 ) 


J 


Multi-use integer counter 


K 


Multi-use integer counter, L + 1 


L 


Line number of text 


LA 


Last line number of text 


LL 


Line length in characters 


LM 


Left margin to start PRINTing 


M 


Multi-use integer counter 


N 


Number "n" for EDIT subcommands. 




Number of spaces to skip for JUSTIFY, 




First new line number for MOVE 


NL 


Number of lines of text 


P 


Position in text line. PRINT line number 


PL 


Page length in number of lines 


Q 


Temporary position in text line 


R 


Return or REPLACE flag (0 or 1 ) 


S 


Spacing between text lines 


u 


ASCII value of space (32) 


X 


length of AS(I ) string, page number 


Y 


Length of A$(l + 1) string. Move cursor 




flag for EDIT ( - 1 or + 1) 


Z 


Last line for COMPILE. DELETE, or 




MOVE 


Table 1. Arrays and Variables 
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its range. It can also bury any end-of-page or 
do-not-justify markers that are not on the last 
line within its range. This should be avoided, as 
the markers are then ineffective. Extra spaces 
between moved words are eliminated, except at 
the end of sentences. 

Following a period, question mark , exclama- 
tion point, or colon, three spaces are inserted. 
Trailing spaces are deleted, leaving only one 
space in a previously all-space line (to keep the 
BLANK command from eliminating the line). 

Note that COMPILE can push extra words 
forward several lines, but can pull words back 
only one line. 

During operation, this command displays 
COMPILING. If, after using COMPILE, the 
last line of the specified block is still too long, a 
LINE n HAS x CHARACTERS message is 
displayed. To correct this, INSERT an empty 
line and COMPILE just those two lines. 

After a satisfactory COMPILE, the text file 
will be automatically displayed by the VIDEO 
command. 

DELETE. This command eliminates a 
specified block of lines. If only one line is to be 
eliminated, enter that line number as both the 
first and last line number to DELETE. The text 
is displayed when done. 

EDIT. The entire line — 255 characters — is 
visible when in EDIT, including the character 
under the cursor. If a non-existent or empty line 
is specified, an ENTRY ERROR message is 
given. This command automatically turns on 
the line number display option. 

Subcommands in the EDIT mode are: 



n - Moves the cursor 10 the left n poMiionv The delault value 
of n is always one. 

n — or n (space) Moves the cursor to the right n position without 
adding spaces 

•\ Again I ancels previous editing changes and reenters EDI I 
mode. (I ist makes editing changes permanent.) 
n C Change next n characters to next n entered characters. Cur 
sor returns to start of changed block when done, as a signal thai 
you have finished 

n D Delete the next n characters, and close up the line. 
H Hack the rest ol the line, and enter the INSERT mode 
I Insert characters into the line and move following characters 
to the right While in the INSERT mode, you can move the cur- 
sor left or right without changes to the text by using — or — 
L List the line and return cursor to the beginning. Also makes 
past editing changes immune to the Again subcommand 
n Sc Search for the nth occurrance jf character c. keeps upper 
and lower case separate, so can be used to find out il a letter on 
the video display is correct case. 

X Go to the end ol the line and enter the INSERT mode 
Shift- 1 Exits the H. I. or X modes and returns to EDIT. 
Shift- -* Moves current text to extreme right of the line 
Shift- * Centers current text, and adds a do-not-justify marker 
to the end of the line. 
ENTER or Shift @ Exits from the EDIT command 



After exiting from EDIT, if the line is too 
long, the LINE n HAS x CHARACTERS 
message is given. If the line is not too long, the 
text is displayed by the VIDEO command. 

FORMAT. This command resets the ten text 
formatting parameters from their default 
values, either for the video display or for print- 
ing of the text. 



1 Line length: Default value is 60 characters to fit on one video 
display line. 

2 Line spaces: Default value is Enter the number of blank 
lines that you want to appear between lines of text 

3 Line numbers: Default value is V. To delete line numbers, 
enter N. 

4. First line: Default value is Olo show all lino of the text To 
start the display or printing at a later line number, enter the 
desired beginning line number 

5. Left margin: Default value is 10 to print the default 
60-character line centered on an 80-chaiaclcr printer This 
setting affects only the printer. 

6 Page length: Default value is 15. This is the number of lines to 
be printed on each page, so you might set it to 50 lor printing 
unspaccd text, or to 25 for spaced lines. 

7 Page numbers: Default value is N, no page number. To print 
page numbers, enter "Y". Note: You must print page numbers 
if you want to print a page heading (sec item 10 below i 

8. Eirst page: Detaull value is one to start page numbering with 
page number one. May be reset as required. 

9. Page I No.: Default value is Y to print page numbers lor all 
pages To print page numbers for all pages exirpi page No. one. 
enter "N". 

10 Heading: Default value is one space It a page heading is to 
be printed at the top of each page, enter il. for this entry only. 
Shift- letter lor lowercase and letter lor uppercase. II the 
heading is to have leading spaces (lor cenlering)or punctuation, 
enclose it in quotesf") The heading is printed or displayed 
only if the page numbering is on (items 7 and 9 above). 



After going through these ten FORMAT 
parameters, you are returned to the command 
mode. 



INSERT. This command inserts a line (or 
lines) of text into the middle of the current text . 
The following lines of text are moved down and 
renumbered. Specifying a non-existent line will 
give an ENTRY ERROR. To insert empty lines 
(for COMPILE or MOVE), just press ENTER. 
If the text file is filled, a "FILE FULL" 
message is given. 

JUSTIFY. This command right -justifies all 
of the text, i.e., it makes the right ends of the 
lines even. The only exceptions are lines with a 
do-not-justify or an end-of-page marker at the 
end, or a line that has no spaces between words. 

Extra spaces are inserted between words, 
starting randomly, but evenly distributed. 
Spaces may be inserted between adjacent 
words, or every other word, depending upon 
whether there are an even or odd number of 
words in the line. Trailing spaces are elimi- 
nated, leaving only one space for an all-space 
line. Leading spaces are not affected, so that in- 
dentation may be maintained. 

It is suggested that JUSTIFY be used only 

after the text is in its final form, as the extra 

Continue to next page 



Program Listing 1 

10 CLS:PRINTTAB( 20) "BASIC WORD PROCESSOR" 

20 ' (C) BY D.D.HINRICHS 1979 

30 DEFINTA-Z:CLEAR7400:NL--120:DIMAS(NL) ,XS (3) , S ( 20 ) ,T(20) 

40 B$«CHR$(30) :C$"CHR$(143) :F$»"### " :N$="Y" :PN$«"N" :P1$="Y" 

50 SS-" ":H$-S$:LA— 1 :P-1 :FP-1 :PL=15 :LL=60 :LM=10 :U*32 :OUT254 , 1 

60 L=LA: IT«0:R«0:A$-"" : PRINT: INPUT"COMMAND" ;A$ : IFAS=" "GOTO80 

70 A-ASC(A$) -64 : IFA>0ONAGOTO90 , 480, 510,760, 7 90, 1220, 80, 1320, 1350, 

1390,1510,1520,1580,80,80,1640,80,17 50,177 0,80,80,1830,80,19 

70 
80 PRINT"** ENTRY ERROR **":GOTO60 
90 CLS:D=0:N$«="Y":IFLA<0THENL=0:GGTO130 ' ADP 
100 IFNL»LA+1THEN210ELSEIFL>FL+12THENB«L-12ELSEB«FL 
110 FORI«BTOL:X-LEN(A$(I) ) :D=D+INT( (X+4 )/64-. 01 ) 
120 GOSUB1910:NEXTI :L=L+1 

130 C«(L-FL+D)*64:IFC>896PRINT:PRINT:C=896 

140 PRINT§C,USINGF$;L; :PRINTA$(L) ; : P-LEN (A$ (L) ) +1 :C=C+P+3 : K=L+1 
150 PRINTec,C$;:A$-INKEY$:PRINT§C,S$; : IFA$=""GOTO15 
160 GOSUB290:ONA-7GOTO360,410,310 

170 IFA«13THENA$«S$:GOTO210ELSEIFA-24THEN3 80ELSEIFA=31GOTO460 
180 IFA=25THEN4 30ELSEIFA=26THEN330 
190 IFA=96IFLA<LTHENLA«L:GOTO60ELSE60 

200 PRINT§C,A$;:A$(L)-A$(L)+A$:IFP<=LLTHENP«P+1:C=C+1:GOTO150 
210 IFRGOTO60ELSEIFNL<=KPRINT:PRINT"FILE FULL" :LA-NL-1 :GOTO60 
220 IFLEN (AS (K) )THENL»K:GOSUB1360 
230 IFK>LATHENLA-K 
240 IFA$*S$GOTO280 

250 F0RM«LL+1T02STEP-1:A$=MID$(A$(L) ,M,1) : IFA$OS$NEXTM :GOTO280 
260 A$(K)=RIGHT$(A$(L) ,LL-M+1) : AS (L) =LEFT$ (AS (L) ,M-1) 
270 PRINTeC-LL+M-l,B$; :L*K:GCTO130 
280 A$ (L) -LEFTS (AS (L) ,LL) :L»K:GOTO130 

290 A-ASC(AS) :IFA>64ANDA<91THENA-A+UELSEIFA>96ANDA<123THENA«A-U 
300 A$»CHR$ (A) : RETURN 
310 IFP>LLGOTO210 ' D 

320 PRINT§C,CHR$(92);:A$(L)«A$(L)+CHR$(17) : A$-S$:GOTO210 
330 IFP>LLGOTO210 ' S-D 
340 C=(L-FL+D)*64+4:IFO900THENC*900 
350 GOSUB1180:P»1:A$*S$:GOTO210 
360 IFP-1GOTO150 ' L 

370 C-C-l:PRINTec,B$; : P=P-1 :A$ (L) "LEFTS (AS (L) ,P-1) :GOTO150 
380 IFP-1GCTO150 ' S-L 

390 A$(L)-"":P=l:C=(L-FL+D)*64+4:IFC>900THENC-900 
400 PRINT§C,B$; :GCTO150 
410 IFP>LL-6GOTO150 * R 



, Continued on the next page. 
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420 A$(L)-A$(L)+STRINGS(5,S$) iC-C+5 sP-P+5 :GOTO150 

430 IFP>LLGOTO210 ' S-R 

440 C- (L-FL+D) +64+4 : IFO900THENO900 

450 GOSUB1200:P-1:A$-S$:GOTO210 

460 IFP>LLGOTO210 ' CL 

470 PRINT§C,CHR$(93);:A$(L)-A$(L)+CHR$(20):A$-S$:GOTO210 

480 CLS:PRINT"DELETING BLANK LINES" :FORJ-LATO0STEP-1 ' BLANK 

490 IFA$(J)-""F0RI-JT0LA:A$(I)=»A$(I + 1) :NEXTI :A$ (LA) -"" :LA-LA-1 

500 NEXTJ:IFRTHENRETURNELSE1830 

510 INPUT"FIRST LINE. TO COMPILE" ;F: IFF<0THENF-0 ' COMPILE 

520 INPUT'LAST LINE TO COMPILE" ; Z: IFZ>LATHENZ-LA 

530 IFF>«ZTHEN80ELSECLS:PRINT"COMPILING":FORL-FTOZ-1:K«L+1 

540 X-LEN (A$ (L) ) :X$="" : IFX<2THEN620ELSEIFX<-LLGOTO600 

550 FORI-XT01STEP-l:AS«MID$(A$(L) ,1,1) 

560 IFA$<>S$THENX$-A$+XS:NEXTI:GCTO600ELSEIFX$=""NEXTI 

570 A«ASC(RIGHT$(X$,1)) :IFA=330RA«460RA-580RA=63THENX$-X$+" " 

580 A$(L) -LEFTS (A$(L) ,1-1) :IFLEN(A$(K) ) -0THENAS (K) -X$:GOTO540 

590 A$(K)-XS+S$+AS(K) :GOTO540 

600 X-LEN (A$ (L) ) : IFX<2THEN620ELSEFORI»XTO2STEP-1 

610 IFRIGHTS(A${L) , 1 ) «S$THENA$ (L) -LEFTS (AS (L) ,1-1) :NEXTI 

620 NEXTL:FORL«FTOZ-l:K-L+l 

630 X-LEN (A$(L)) :Y-LEN(A$(K) ) :X$="" : IFX-0ORY-0GOTO750 

640 A=ASC (RIGHTS (A$ (L) ,1) ) 

650 IFA=330RA=460RA»580RA«63THENA$(L)-AS(L)+" ":X-X+2 

660 FORI«lTOY:A$«MID$(A$(K) ,1,1) 

67 IFA$OS$THENX$-X$+A$:NEXTIELSEIFX$-""NEXTI 

680 IFLL-X<IGOTO710 

690 Y«Y-I:IFY<0THENY-0 

700 A$(L)-A$(L)+S$+X$:A$(K)»RIGHTS(A$(K) ,Y) :GOTO630 

710 X-LEN (A$ (L) ) : IFX<2THEN730ELSEFORI-XTO2STEP-1 

720 IFRIGHTS (A$(L) , 1 ) -S$THENA$ (L) -LEFTS (A$ (L) ,1-1) :NEXTI 

7 30 IFY<2THEN750ELSEFORI=YTO2STEP-1 

740 IFLEFT$(A$(K) , 1 ) -SSTHENAS (K) -RIGHTS (AS (K) ,1-1) :NEXTI 

750 NEXTL:X«LEN(A$(Z)) :GOTO900 

760 INPUT'FIRST LINE TO DELETE" ;F: IFF<0THENF-0 ' DELETE 

770 INPUT'LAST LINE TO DELETE" ; Z : IFZ>LATHENZ-LA 

7 80 IFF>ZTHEN80ELSEFORI-FTOZ:A$(I)-"":NEXTI:GOTO1830 

790 INPUT'EDIT LINE" ;L: IFL<0ORL>LAORA$ (L) -""GGTO80 ' EDIT 

800 C=4:P»1:X$(0)-A$(L) :N$="Y" 

810 CLS:I»L:GOSUB1910:N-1:Q$-"" 

820 GOSUB910:IFA>47ANDA<58THENQ$«Q$+A$:N*VAL(Q$) :GOTO820 

830 M-0:IFA=8THENY— 1:GOSUB940ELSEIFA«9ORA-UTHENY-1:GOSUB940 

840 IFA»97THENA$(L)=X$(0) :GOTO800 ' A 

850 IFLEN(A$(L)) >-LLGOTO870 

860 IFA=25GOSUB1200ELSEIFA-26GOSUB1180 

870 IFA>98ONA-98GOSUB960, 1000, 1960, 1960, 1960, 1020, 1030 

880 IFA=115GOSUBll20ELSEIFA«12pGOSUB117 0ELSEIFA-108GOTO800 

890 IFM=lTHENN-l:Q$="":GOTO820ELSEIFRPRINTg320,;ELSE810 

900 IFLL<XPRINT"LINE";L; "HAS" ;X; "CHARACTERS" :GCTO60 ELSE 1830 

910 X$=MID$(A$(L) ,P,1) 

920 PRINTgC,C$j:A$=INKEY$:PRINT§C,XS;:IFA$-""GOTO920 

930 GOSUB290:X-LEN(A$(L) ) : IFA-130RA=96THENR=1 rRETURNELSERETURN 

940 M=l:FORI-lTON:P-P+Y:IFP>XTHENP-X:RETURN 

950 I FP< 1THENP-1 : RETURNELSEC-C+Y : NEXTI : RETURN 

960 Q-P:D-C:FORI-1TON:GOSUB910:IFRORA«27THENP-Q:C-D:RETURN ' C 

970 PRINTgC,A$;:GOSUB1100:P-P+l:GOSUB1110:A$(L)-L$+A$+R$ 

980 A=U:C«C+1:IFP<«XNEXTI 

990 P-Q:C-D: RETURN 

1000 IFP+N-1>XTHENN=X-P+1 ' D 

1010 GOSUBll00:Q-P:P-P+N:GOSUB1110:A$(L)«L$+R$:P-Q: RETURN 

1020 GOSUB1100:A$(L)»L$+S$:PRINT§C,B$ * H 

1030 GOSUB910:IFRORA-27RETURN ' I 

1040 IFA-10THENA$(L)-A$(L)+CHR$(17) :R=1:RETURN 

1050 IFA-31THENA$(L)-AS(L)+CHR$(20) :R=1:RETURN 

1060 PRINT§C,A$;:IFA-8THENY— 1:GOSUB940:GOTO1030 

1070 IFA-9THENY-1:GOSUB940:GOTO1030ELSEIFP>XTHENX-P 

1080 GOSUB1100:GOSUB1110:A$(L)-L$+A$+R$:PRINTgC,B$;A$+R$ 

1090 C=C+1:P=P+1:GOTO1030 

1100 L$="":IFP<2RETURNELSEL$-LEFT$(A$(L) ,P-1) iRETURN 

1110 RS-"":IFP>XRETURNELSER$-RIGHT$(AS(L) ,X-P+1) rRETURN 

1120 GOSUB910:Q-P:D-C * S 

1130 FORI-1TON : F-0 : FORJ-Q+1TOX : D-D+l 

1140 IFMID$(A$(L) ,J,1)-A$THENF=1:Q-J:J-X 

1150 NEXTJ:NEXTI:IFFTHENP-Q:C-D 

1160 A-U: RETURN 

1170 A$(L)-A$(L)+S$:P-X+liC«P+3:GOTO1030 ' X 

1180 A$(L)=STRING$((LL-LEN(A$(L)))/2,32)+A$(L)+CHR$(20) ' S-D 

1190 PRINTeC,B$;AS(L) jCHR$(93) ;: RETURN 

1200 A$ (L) -STRINGS (LL-LEN (AS (L) ) ,32) +A$(L) ' S-R 

1210 PRINT§C,B$;A$(L) ;: RETURN 

1220 CLS: PRINT "LINE LENGTH -" jLL , : INPUT"NEW -";LL ' FORMAT 
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spaces may be incorrectly left in by COMPILE 
(after EDITing). During its operation, this 
command displays JUSTIFYING; when done, 
the text is displayed by VIDEO. 

KILL. This command eliminates all text 
from the text file, leaving the program ready to 
accept new text. The command asks twice if 
you really want to KILL the text to avoid ac- 
cidental loss of a text file. 

LOAD. This command loads a previously 
SAVEd text file from cassette. It can then be 
treated just like a keyed-in text file. After you 
enter this command, the program pauses to let 
you get the cassette in position and set the re- 
corder to play. Since it may take several min- 
utes to load the text file, the program displays 
LOADING to reassure you that the program 
has not hung up. 

MOVE. This command transfers a specified 
block of lines either forward or backward in the 
text file. Lines MOVEd to must be empty 
(blank); lines MOVEd from are left empty. In- 
sert may be used to place empty lines where 
needed. 

If a non-empty TO line is found, the transfer 
of lines stops, and a "LINE n NOT EMPTY" 
message is displayed. However, no text is lost. 
After the MOVE is complete, the text is dis- 
played by VIDEO. 

PRINT. This command prints the text file. 
Remember to reset FORMAT before trying to 
PRINT your text. If the printer is not ready 10 
go. PRINTER NOT READY. ABORT (Y/N) 
is displayed, and you have a chance to get the 
printer ready or to go back to the command 
mode. 

The BLANK command is automatically ex- 
ecuted before PRINTing, as a blank line would 
cause a FUNCTION CALL error. During its 
operation, first DELETING BLANK LINES, 
the PRINTING is displayed. If the printer en- 
counters an end-of-page character (ASCII 17) 
that page will be terminated early, the normal 
between-pages spacing inserted and the next 
lull page started. Note: It is assumed that roll 
paper is being used; no form feeds are used. 

Different printers operate somewhat differ- 
ently, so you may have to change some things in 
lines 1680-1740. Specifically, my printer, a 
COMPRINT 912, interprets the ASCII control 
character 30 in line 1680 as continuous print (no 
pagination). The corresponding control char- 
acter 28 in line 1740 means paginate (insert 
seven blank lines). 

Some printers may require line feed 
characters (usually ASCII 10) after each 
printed line. 

Some printers will not accept the LPR1NT at 
the end of line 1690, and require LPRINT- 
CHRS(138)(or LPRINT" ")instead. If the 138 
pseudo-control character in line 1710 does not 
work for you, use: 

1710 M r M , l:IFSK)RK !TOS;I PRINT" ":NEXTK 

Continued on page 54 
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BUSINESS CONTROL PROGRAMS 



;] PAYROLL D GENERAL LEDGER U ACCOUNTS PAYABLE □ ACCOUNTS RECEIVABLE 

These business systems are designed with the business man- • A Totally Linked Single Entry 
ager in mind. Major changes in your current bookkeeping meth- Accountinq System 
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or through subprograms, so that duplicate data entry is not re- 
quired. This avoids mistakes. 

Accurate reports of financial activity may be obtained on a 
scheduled basis or at irregular intervals. 

The systems require CP/M and CBASIC. Customization, instal- 
lation and training are available at additional cost. WRITE FOR 
SAMPLE REPORT AND TRIAL DISK — $25.00 (credited toward 
purchase price). 



User Assignable Account Numbers 
Flexible, Reliable and Efficient 
Installation and Training Available 



AS LOW AS 



CP'M 2.2 Control Program for Microcomputers 
Enabling You to Run Software Published for 

CP/M 1.4 On the TRS-80 Model II (Including Communications Programs) 




CP/M is considered the industry standard disk operating system be- 
cause it gives you the hardware-independent interface you need to 
make your computer work for you. FMG CORPORATION NOW OFFERS 
THE CP/M 2.2 FOR THE TRS-80 MODEL II. The latest in the evolution 
of a reliable and efficient software system, CP'M 2. 2 features an en- 
hanced upward compatible file system and .powerful new random ac- 
cess capabilities. From minidisks and floppy disks, all the way to high- 
capacity hard disks (when available), the flexibility of CP/M 2.2 makes 
it a truly universal operating system. Tfie package includes an 8" sys- 
tem disk, editor, assembler, debugger and communication software for 
the TRS-80 Model II . Special utilities not available with other CP M sys- 
tems are also included in FMG's CP'M 2.2 

(CP.M is a registered trademark of f 

Digital Research Corp. TRS-80 is a ' 

registered trademark ot Radio Shack) 



« TRS-80 PROJECT 








THE PASCAL/MT&~$250.00 

PASCALMT-, a native code PASCAL compiler designed for 808O-/8085 
and Z80 microcomputer systems, provides an efficient development 
cycle as well as efficient execution of object programs. 




CORPORATION 



P.O. BoxHBQ 

Ft. Worth, Texas 76133 ^« 

Phone (817) 294-2510 



Send for FREE CATALOG 




Compiler executes under the CP.M 
operating system in as little as 32 
K , bytes of RAM 

Interactive Symbolic Debugger which 
enables the programmer to examine 
variables, set a breakpoint, and trace 
procedure calls interactively at run 
time 

1 Compiles at the rate ot 600 lines per 
minute on a 2 MHZ 8080 

• Programs Execute up to 10 TIMES 
FASTER than popular interpretive 
Pascals 

■ The code generated is 8080 object 
code which is ROMable with a mini- 
mum run time overhead of 1 5K bytes 

• Interrupt procedures allow the pro- 



grammer to wnte interrupt drivers lor 
I'O and other real time tasks in Pas- 
cal MT 

Bit manipulations of variables may be 
performed with the built-in proce- 
dures. SETBIT, CLRBIT. TSTBIT, 
SHL. SHR. SWAP. LO. HI. 

1 Assembly language subroutines may 
be called from Pascal MT 

1 Business arithmetic version of Pascal' 
MT is also available 

■ Pascal data structures supported are: 
ENUMERATION AND SUBRANGE 
TYPES, RECORD. ARRAY. REAL, 
INTEGER, CHAR, and BOOLEAN 

• Not implemented are: SETS. GOTO, 
GET. PUT 



PASCAL/MT™ includes compiler and a real time symbolic debugger. 
The system requires 32K minimum and 2 mini disks or one 8" disk. 



*• Reader Service - see page 162 
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A little revision should allow any printer to 
be used. 

REPLACE. This command allows any spec- 
ified line to be replaced with a newly entered 
line. REPLACE operates just like ADD, except 
that it applies to only one line. After a FILE 
FULL message, you cannot REPLACE a line. 

SAVE. This command records the text file 
on cassette. The program pauses to let you get 
the cassette into position. It displays SAVING 
during operation. You cart record four lines of 
text per data block to save time and tape. If the 
line length is greater than 61 characters, only 
three lines of text can be recorded per block. If 
it is greater than 82 characters, only two lines of 
text can be recorded per block. If it is greater 
than 123 characters, only one line of text can 
be recorded per block. 

To make the changes (if necessary), change 
the four at the end of line 1 780 of the program, 
the three in line 1790, and reduce the number of 
X$()'s in line 1810 to the number of lines per 
block being recorded. 

To LOAD the text recorded with the revised 
SAVE routine, corresponding changes must be 
made to lines 1540 and 1550 of the program. If 
text lines are more than 60 characters long. NL 
should be redefined in program line 30 to ap- 
proximately 7200/(charactcrs per line). The ex- 
act value should be a number divisible by lines 
per block. NL = 120, for example 1 20 is evenly 
divisible by four. 

VIDEO. This command displays the text file 
on the video display. If the line length is greater 
than 60 characters (64 if Line Nos. was set N in 
FORMAT), the lines will "wrap around" to 
the next display line. 

After each displayed page of text, the pro- 
gram halts showing PRESS ENTER?. To 
display the next page just press ENTER; to 
return to the command mode (to EDIT a line, 
etc.) key in any letter, then press ENTER. 

VIDEO may show one of three non-texi 
markers at the end of a line: A left arrow for 
do-not-justify, a down arrow for end-of-page 
or an underline after any trailing space. These 
markers allow you to keep better track of the 
text. 

EXIT. This command allows for a graceful 
end to the program. More importantly, it 
CLEARs the string space to its normal value, 
so that the next program you run does not 
crash. It is easy to forget to CLEAR 50. It also 
returns the TRS-80 to its normal speed 
(OUT254.0). 

This command asks again if you really want 
to EXIT from the program to avoid accidental 
loss of the text file. 

HELP. This command displays all 17 legal 
commands and their one-word definitions, to 
refresh your memory. It also tells how to 
return to the command mode, for those com- 
mands that do not automatically return. 



1230 
1240 
1250 
1260 
1270 
1280 
1290 
1300 
1310 
1320 
1330 



1340 

1350 
1360 
1370 
1380 
1390 
1400 
1410 
1420 
1430 
1440 
1450 
1460 
1470 
1480 
1490 
1500 
1510 
1520 
1530 
1540 
1550 
1560 
1570 
1580 
1590 
1600 
1610 
1620 
1630 
1640 
1650 
1660 
1670 
1680 
1690 
1700 
1710 
1720 
1730 
1740 
1750 
1760 
1770 
17 80 
1790 
1800 
1810 
1820 
1830 
1840 
1850 
1860 
1870 
1880 
1890 
1900 
1910 
1920 
1930 
1940 
1950 
1960 
1970 
1980 



PRINTLINE SPACES 
PRINTLINE NOS. » 
PRINT "FIRST LINE » 
PRINT-LEFT MARGIN 
PRINT "PAGE LENGTH 
PRINT"PAGE NOS. - 



■";S, :INPUT"NEW -";S 

";NS;"'",:INPUT"NEW (Y/N)";NS 

"jFL,:INPUT"NEW -";FL 
'">LM, :INPUT"NEW -";LM 
■";PL,iINPUT"NEW -";PL 

'"jPNSj"'", :INPUT"NEW (Y/N) ";PN$ 



PRINT"FIRST PAGE = " ;FP, : INPUT"NEW =";FP 

PRINT'PAGE 1 NO. * ' ";P1$;"' ', :INPUT"NEW (Y/N)";P1$ 

PRINT"HEADING - '"jH$;"' " , : INPUT"NEW «" ;H$ :GOTO60 

CLS:PRINT"LEGAL COMMANDS ARE:" ' HELP 

PRINT"A ADD","B BLANK", "C COMPILE", "D DELETE", "E EDIT", 

"F FORMAT", "H HELP", "I INSERT", "J JUSTIFY", "K KILL","L 

LOAD","M MOVE","P PRINT", "R REPLACE", "S SAVE","V VIDEO 
","X EXIT" 

PRINT"KEY 'SHIFT-?' TWICE TO RETURN FROM A,E,I,R TO COMMAND 
MODE":GOTO60 

INPUT"INSERT AT LINE" ; L: IFL<0ORL>LAGOTO80 ' INSERT 
IFNL«LA+1PRINT"FILE FULL" : GOTO60ELSEI FRGOTO60 
FORI-LATOLSTEP-1 : A$ ( 1+1 ) "AS ( I ) : NEXTI 
A$(L)-"":LA-LA+1:L«L-1:IFITRETURNELSEIT=1:GGTO90 
CLS:PRINT"JUSTIFYING":FORL«0TOLA:X-LEN(AS(L) ) 'JUSTIFY 
IFX<2GOTO1500ELSEFORI«XTO2STEP-1:A«ASC (RIGHTS (AS (L) ,1)) 
IFA-UTHENAS(L) "LEFTS (A$(L) ,1-1) :X-X-1:NEXTI 
IFX>«LLORA»17ORA-20THEN1500ELSEJ»0:K-1:FORI-1TOX 
IFMIDS (A$ (L) , I , 1) <>S$THENK-0ELSEIFK-0THENK«1 :S{ J) =1 : J-J+l 
NEXTI : IFJ-0GOTO1500 

K-RND (J) -1 : IFINT ( J/2 ) «=J/20RJ-1THENN«1ELSEN=2 
F0RI-1T0LL-X :T(K) =T (K) +1 :K-K+N: IFK>J-1THENK=K-J 
NEXTI:FORI«J-1TO0STEP-1:A$=STRINGS(T(I) ,S$) :T(I)=0 
A$ (L) -LEFTS (AS (L) ,S (I) ) +AS+RIGHTS (AS (L) , LEN (AS (L) ) -S ( I ) ) 
NEXTI 

NEXTL:GOTO1830 

CLS:INPUT"REALLY KILL (Y/N) " ; AS : IFAS- " Y"THENRUNELSE60 ' KILL 
GOSUB1820:CLS:PRINT"LOADING" ' LOAD 
INPUT#-1,LA,LL,S,N$,FL,LM,PL,PNS,FP,P1$,H$ 
FORI»0TOLASTEP4:INPUT#-1,X$(0) ,X$(1) ,X$(2) ,XS(3) 
FORJ-0TO3:L»I+J:X=LEN(X$(J)) :A$ (L)="" : IFX<1GOTO1570 
F0RK=lTOX:A$(L)=A$(L)+CHRS(ASC(MID$(X$(J) ,K,1) )-128) :NEXTK 
NEXTJ : NEXTI : GOTO60 

INPUT"FIRST LINE TO MOVE" ;F : IFF<0THENF-0 ' MOVE 
INPUT'LAST LINE TO MOVE" ;Z : IFZ>LATHENZ-LA 
IFF>ZTHEN80ELSEINPUT"FIRST NEW LINE" ;N : FORI =FTOZ 
IFLEN(AS(N) )PRINT"LINE";N;"NOT EMPTY" :GOTO60 
A$ (N) -AS ( I ) : AS ( I ) = " " : N-N+l : IFN>LATHENLA-N 
NEXTI:GOTO1830 

IFPEEK(14312)<128THENX-FP:M=FL:GOTO1670 ' PRINT 
INPUT"PRINTER NOT READY. ABORT (Y/N)";A$ 
IFAS»"Y"THEN60ELSEINPUT"PRESS ENTER" ;A$:GOTO1640 
R»1:GOSUB480:CLS: PRINT" PRINTING" 

LPRINTCHR$(30) :IFPN$O"Y"OR(P1S»"N"ANDX=1)GCTO17 00 
LPRINTTAB(LM)H$;TAB(LL+LM-7) "Page" ;USING" t t #" ; X :LPRINT 
FORP-MTOM+PL-1 : IFP>LAGOT017 40 
M-M+1:IFSLPRINTSTRINGS(S,138) 
LPRINTTAB(LM) ; : IFN$="Y"LPRINTUSINGF$;P; 
LPRINTAS(P) :IFASC (RIGHTS (A$ (P) ,1))<>17NEXTP 
LPRINTCHR$(28) : IFP>LATHEN60ELSEX=X+1 :GOT016 80 
INPUT'REPLACE LINE " ; L: IFL<0ORL>LAGOTO80 ' REPLACE 
R=1:A$(L)-"":L-L-1:GOTO90 
GOSUB1820:CLS:PRINT"SAVING" ' SAVE 

PRINT#-1,LA,LL,S,N$,FL,LM,PL,PN$,FP,P1$,H$:FORL=0TOLASTEP4 
FORJ-0TO3 : I=L+J : X=LEN ( A$ ( I ) ) : X $ ( J ) = " " : IFX<1GOTO1810 
FORK-lTOX:X$(J)=X$(J)+CHR$(ASC(MIDS(A$(I) ,K,1))+128) :NEXTK 
NEXTJ :PRINT#-1,XS(0) ,X$(1) ,X$(2) ,X$(3) :NEXTL:GOTO60 
INPUT"READY CASSETTE, THEN PRESS ENTER" ;A$ : RETURN 
CLS:X-FP-1:FORM=FLTOLASTEPPL:X-X+1 ' VIDEO 
IFP1$«"N"ANDX«1GOTO1860 

IFPN$="Y"PRINTHS;TAB(LL-7) "Page" ; USING" ###" ;X: PRINT 
FORI-MTOM+PL-1 : IFI>LAGOTO1890 
IFSPRINTSTRING$(S-1,10) 
GOSUB1910 

NEXTI :AS-"":IFK-LAINPUT"PRESS ENTER" ;A$: IFA$<>""M=LA 
NEXTM : L»LA:GOTO60 
Y-LEN (AS ( I ) ) : I FYTHENA-ASC (RIGHTS (A$ ( I ) , 1 ) ) ELSEA-0 

IFN$»"Y"PRINTUSINGF$; I; 
PRINTA$(I) ;:IFA«17PRINTCHR$(92) ; 

IFA«20PRINTCHR$(93) ;ELSEIFA=UPRINTCHRS (95) ; 

IFN$O"Y"ORYO60PRINT - 

RETURN 

CLS:INPUT"REALLY EXIT (Y/N) " ; AS : IFA$O"Y"GOTO60 ' EXIT 

CLS : CLEAR50 : OUT254 , : END 
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Potential Program Problems 

Speed is the most noticeable problem, but 
this is inherent in BASIC strings. The lack of 
speed shows up as brief pauses in program 
operation. As the text file becomes full, the 
pauses become more frequent and longer. Each 
time BASIC manipulates a string, it must 
assign a new location for it in string space. This 
quickly fills up string space, so a garbage collec- 
tion routine is used to delete all of the old, no- 
longer-needed versions. 

This periodic garbage collection causes the 
pauses. Some other BASICs avoid this string- 
handling problem by requiring that the length 
of all strings be specified in advance, thus 
trading off flexibility and memory space for 
speed. 

One partial solution to the speed problem is 
to install the Archbold TRS-80 clock control 
board. The OUT254.1 at the end of line 50 
automatically increases speed by 50 percent if 
this has been done. Otherwise, it has no effect. 

A program halt accompanied by a BASIC er- 
ror message or from accidentally touching 
BREAK does not necessarily mean that your 
text file is lost. In most cases you can recover by 



typing GOTO 60, then pressing ENTER. This 
puts you back into the command mode. 

A trailing space in the 60th position on a line 
will cause a wrap-around underline marker on 
the next line when displayed. Such a trailing 
space can be removed by using EDIT, COM- 
PILE, or JUSTIFY. 

Under some conditions, an extra blank line 
may be inserted in the video display when text is 
being keyed in. This is not an extra line in the 
actual text file, as can be verified by using 
VIDEO 

When using EDIT, if you delete all printable 
characters following the cursor, it stops 
flashing and becomes solid. This does no harm; 
press L to get back to normal operation. 

If a text line has more than 22 words and re- 
quires over 21 spaces to justify, an error will oc- 
cur in JUSTIFY. To avoid this, redimension 
arrays S and T in line 30, but not too much, or 
you will run out of memory. 

Program Modifications 

This program requires 7226 bytes of memory 
as loaded, but uses nearly all the memory of a 
16K TRS-80 when RUN. 



For a 32K TRS-80, change CLEAR74O0 to 
CLEAR22000 and change NL-120 to 
NL = 360 in line 30. This not only triples the 
size of the text file, but also increases the pro- 
gram's speed. 

This program uses the ASCII control charac- 
ters 17 and 20 as markers representing end-of- 
page and do-not -justify, respectively. If these 
characters are not NOPs (no operation) on 
your printer, change 17 in program lines 320, 
1040. 1420. 1 730, and 1 930 and/or change 20 in 
program lines 470, 1050, 1 180. 1420, and 1940 
to values that do not affect your printer. 

You may want to add extra features to this 
program. Be warned: There are less than 100 
bytes of memory left unused. For everything 
added, something will have to be deleted. I have 
already minimized REMarks, used multiple 
statement lines, reused variables, and left out 
all spaces to save memory, as well as to increase 
speed. 

To help with possible modification, 1 have 
included Table 1 Arrays and Variables. A brief 
REMark shows the entry point for each com- 
mand. Even more brief REMarks show the en- 
try points for subcommands in ADD and 
EDIT.B 



INFINITE IHIC 

For MOD I TRS-80™ Tape and Disk Systems 



Extensions to Lsvsl II snd Disk BASIC $49.95 

Full MATRIX Functions — 30 BASIC commands!! 

Mathematical and common matrix functions. Change arrays in 

mid-program. Complete array handling. Tape array read and write, 

including strings. Common subroutine calls. 

Over 50 more STRING Functions as BASIC commands!! String 

manipulation, translation, compression, copying, search, screen 

control, pointer manipulation and utility functions. Includes 

multikey multivariable machine language sorts. Load only machine 

language functions that you want! Where you want in memory! 

Relocating linking loader! More than you ever expected!! 

oe BUSINESS (Requires Infinite BASIC) $29.95 

20 Business oriented functions including: 
Printer Automatic Pagination with headers and footers! 
Packed Decimal Arithmetic ( + ,-,'J) 127 digits! 
Binary array searches and hash code generator! 
COMPROC Command Processor for Disk Systems $19.95 
Auto your disk to perform any sequence of DOS commands, 
machine language loads, BASIC, memory size, run program, 
respond to input statements, etc. Single BASIC command file 
defines execution! Includes auto key-debounce, screen print and 
lower case software driver. 

REMODEL + PROLOAD Specify 16, 32, or 48K Memory $34J6 

REnumber any portion or all of BASIC program. MOve any portion 

of program from one location to another. DELete program lines. 

MERGE all or any portion from tape. Save and verify portion or 

all of combined merged programs to tape. 

QSF (Specify 16, 32, or 46K) $24.95 

18 Machine language routines. Includes RACET sorts. 

C £ *?k V 'S A ' B^SftP" DEALER INQUIRIES INVITED 

T.I- w V:lt R# ™ n f " 9l£Z mmmm ^ m WHEN ORDERING PLEASE 

Telephone Orders Accepted (71 4) 637-5016 advise publication source 

TRSeO IS A REGISTERED TRADEMARK OF TANDY CORPORATION 



FAST- 



For MOD I and MOD II TRS-80™ 

Now you can sort an 85K diskette 



FAST 



in less than 3 minutes* 

Perfect for your multi-diskette RANDOM file mailing lists, inven- 
tory, etc. Ideal for specialized report generation. Sort, merge or 
combination. All machine language stand-alone package — 
Efficient and easy to use. No separate key files required! Physical 
records are rearranged on diskette! Supports multiple sub records 
per sector including optional sector spanning. Sorts on one or 
more fields — ascending or descending. Sort fields within records 
may be character, integer, and floating-point binary. Provides 
optional output field deletion, rearrangement, and padding. 
'Sort timings shown below are nominal times. Times will vary 
based on sort and system configurations. Nominal times based 
on Mod 1 48K 4-drive configuration, 64 byte records, and 5 sort keys. 
TYP€ FILE SIZE SORT TIME TYPE FILE SIZE SORT TIME 





(Bvtei) 


(Sec) 




SORT 


16K 


33 


SORT 


SORT 


32K 


49 


SORT 


SORT 


85K 


173 


SORT and 


SORT 


170K 


445 


MERGE 



(Bytts) (Sec) 

340K 1081 

680K 2569 

85KSORT+ 1757 

1275K Merge 

DSM for Mod I (Minimum 32K, 2-drives) $75 On-Disk 
DSM for Mod II (Minimum 64K, 1 -drive) $1 50 On-Disk 

Mod II Development Package $100 

Machine Language SUPERZAP, plus Editor/Assembler and 
Disassembler patches. 
Mod II Generalized Subroutine Facility 'GSP $50 



• 41 
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Tit Palme-ali. Oransje CA 62669 



- Header Service — see page 162 
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The de facto standard is challenged by Radio Shack. 



Pencil VS. Scripsit 



by Jim Perry 
80 Staff 



The Electric Pencil from Michael Shrayer 
Software and Radio Shack's Scripsit are 
both sophisticated word processors for the 
TRS-80. Scripsit is the "official" offering 
from Tandy Corporation, whereas Pencil has 
been the de facto standard for more than a 
year. Each program, written in assembly lan- 
guage, can be used with either cassette or disk 
systems. 

Word processing is one of the microcom- 
puter's most useful applications. Using a 
word processor documents can be edited, 
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Electric Pencil menu. 



reformatted or printed out with a minimum of 
effort. Instead of the usual "Dear Sir or 
Madam," form letters can be customized with 
the name of the intended reader. By storing a 
selection of paragraphs, standard responses 
to a number of inquiries can be produced in a 
minimum of time. 

Its list of applications is endless. Once you 
have the opportunity to use such a system, 
you'll wonder how you ever managed without 
one! 

Upper and Lowercase 

Any word processor without the ability to 
produce both upper and lowercase letters has 
limited usefulness. Because of penny-pinching 
at Radio Shack, the TRS-80 was produced 
without the five-dollar memory chip needed 
to display lowercase letters. Since that time, 
various companies have made available 
reasonably priced (less than $30) hardware 
conversion kits for the computer, but all in- 
volve opening up your keyboard and voiding 
Radio Shack's warranty. The most popular 
conversion is designed to interface with the 
Electric Pencil and includes an extra control 
key for special commands. 

When Radio Shack announced Scripsit, 
they also released the official lowercase modi- 
fication — at a cost of $99. Either Pencil or 
Scripsit can be used as uppercase systems 
without any modification to your computer. 

Radio Shack's conversion has no extra key. 
The @ key performs as the control key (to 
produce @, the shift is used). Luckily, for 
the thousands of owners with non-Radio 
Shack modifications, Scripsit will work with 
the normal Electric Pencil lowercase modifi- 
cation. However, anyone who has Radio 
Shack install a lowercase kit is stuck with 
Scripsit. The Electric Pencil will not produce 
lowercase with this official modification. 

Scripsit costs $69 for the cassette version 
and $99 on disk. The Electric Pencil retails for 
$100 for the cassette only version. A cassette 
for disk based systems costs $150. 

This review is based on the disk versions of 
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Typical Scripsit display. 

both programs. In both cases all the cassette 
commands are still available. 

If you start off with the cassette version 
of either program (because you don't have 
disks), you can copy all your files onto disk at 
a later date. As supplied, neither will operate 
with NEWDOS, but patches are available 
from Apparat that allow both to work with 
this DOS. 

Manuals 

The Electric Pencil comes with a 32-page 
operator's manual, written as a guide rather 
than a textbook, and the technique works well. 
Even though there are more than 40 commands 
available, the average user can develop a good 
understanding of the system in an afternoon of 
reading and experimenting. 

The Scripsit disk is supplied with sample text 
files, and two program versions — one for up- 
percase only and the other for systems with a 
lowercase modification. 

The documentation is much more impressive 
than that supplied with Electric Pencil, com- 
plete with ring binder and a three-cassette audio 
instruction course. However, the taped instruc- 
tion course needs about six hours to listen to, 
and the manual is written as an accessory to the 
audio. As a result of this programmed learning 
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approach, the manual is not really usable on its 
own. The quick reference sheet included in the 
package is the nearest you get to a simple user 
guide. 

The Electric Pencil has a menu of print 
parameters, such as line length and page length, 
and you set them all before printing. The 
parameters are not stored with the text file, and 
this means that you have to remember what 
they were. 

Scripsit differs fundamentally from the Elec- 
tric Pencil in this respect. Scripsit uses format 
lines that are saved as a part of the text. Every 
time a file is used, it automatically sets its own 
printing parameters. This difference in opera- 
tion gives Scripsit far more flexibility than the 
Electric Pencil. Also, the number of commands 
available in Scripsit is greater than the 40 or so 
available to the Pencil user, but this also makes 
it much more difficult to understand and use. 

Surprisingly, three of the most useful 
features of Electric Pencil are not available to 
the Scripsit user! The suffix /PCL is automati- 
cally added to all files created by Pencil. This 
makes it easy to spot them on your disk direc- 
tory. Pencil only recognizes files with the /PCL 
suffix. Scripsit does not add a suffix to files, 
leaving it to the user to supply them. 

The command DI(:1 ,2 or 3) in Pencil gives a 
directory of all files with the 'PCL suffix on the 
drive specified. (The default is drive 0.) In 
Scripsit you have to exit the system and use the 
DIR command when in DOS, then return to 
Scripsit, quite a messy procedure; and, in fact, 
impossible, if you make the mistake of turning 
Scripsit into an AUTO command on the disk, 
as I did! 

The third feature missing from Scripsit is the 
ability to kill files, again you are expected to 
return to DOS etc. 

Conclusion 

Apart from the three omissions described 
above Scripsit has a much larger set of format- 
ting commands than Pencil — tabs, centering, 
flush right, alternate page headings and foot- 
notes to name just a few. By careful use of these 



Scripsit is cheaper and 

more flexible, so how 

can the Pencil compete? 



commands your printouts can be made to do 
amazing things, but the format instructions can 
drive you crazy. Maybe the six hour course 
wasn't such a loopy idea after all! 

Scripsit is cheaper and more flexible, so how 
can the Pencil compete? Simplicity is the an- 
swer, I tend to create files in Pencil and print 
them out with Scripsit— the 80 office system 
has the unofficial modification, so both pro- 



grams can be used. 

For real fancy printing Scripsit is a must, but 
for ease of operation. Pencil can't be beat. 
Maybe somebody will come up with a Pencil 
compatible with the Radio Shack modification, 
or. perhaps, produce software that is as nice to 
use as Pencil— but as advanced as Scripsit. Un- 
til that time, Scripsit is the new champion of 
word processing. ■ 
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REVIEW 



Psst, want some extra commands — try Level III. 



Level 1 1 1 



I can...tcstify 

that in copying a 

couple of lengthy 

game programs using 

just three commands 

...saved considerable 

typing. 



Ronald H. Bobo 

3246 Gravois 

St Louis MO 63118 



Level III was written by Bill 
Gates, president of Micro- 
soft, which produced Level II 
BASIC for Radio Shack, so there 
is no question of compatibility. 
Furnished on cassette, Level 
III is attractively packaged and 
is accompanied by an excellent 
instruction manual as well as a 
convenient fold-up card contain- 
ing all statements, commands 
and functions of both Levels II 
and III. Level III statements are 
printed in red on the card. 

As stated in the instruction 
manual, Level III is not just an- 
other BASIC, but an actual en- 
hancement to the already ver- 
satile Level II BASIC. Require- 
ments for using Level III are a 
Radio Shack TRS-80 computer 
with Level II BASIC and a 
minimum of 16K random access 
memory. According to the 
manual, Level III occupies about 
5.25K of existing RAM. This still 
leaves 10K for programming 
space in a minimum system. 

Although Level III will not 
work with Radio Shack's disk 
BASIC, a disk file version is in- 
cluded on the tape for those 
who might wish to save it on 
disk. Presumably, Level III can 
be used instead of Disk BASIC 
with a disk system. 

Level 111 Features 

As soon as Level III is loaded, 



you should notice one big dif- 
ference. No more keyboard 
bounce! More reliable tape 
loading is also assured. Volume 
setting on the tape recorder is 
not nearly so critical as with 
Level II. Two new commands, 
SAVE and LOAD replace CSAVE 
and CLOAD. Of course, a pro- 
gram saved with the new com- 
mand will still load under the 
CLOAD command when using 
Level II, but volume setting will 
again be critical. Although all re- 
corders are not the same, most 
programs in Level II load at a 
volume setting between 4 and 5 
on my machine. Curiously, I 
must crank it up to about 8 
before the Level III cassette will 
load. 

For those who miss the one- 
letter abbreviations of Level I 
BASIC, behold! Type LSET LIST, 
hit ENTER, and 26 one-letter 
abbreviations will appear on the 
CRT. These are activated by 
pressing the shift key and the 
desired letter key simul- 
taneously. Some even have 
ENTER included, i.e., press shift 
and R and RUN is printed out 
and automatically entered; you 
don"t have to press the ENTER 
key. 

If you have data that is to be 
entered in a program frequently 
and it is not included in the list 
of abbreviations, despair not. All 
LSET entries are user-change- 
able. For instance, in writing a 
graphics program, you may 
want to use CHR$ often. Type 
LSET L = "CHR$(", enter, and 
now, when you type a shifted L, 



CHR$ will be printed, followed 
by a left parenthesis. Typing 
LSET L="LIST" will return the 
shifted L to its original definition 

What about using a printer 
with lowercase letters? Nothing 
simpler. Typing LSET RESET 
will turn off all shift-key entries. 
Type LSET SET to turn them 
back on again. 

Shift-key entries need not be 
commands. If you're running a 
program that requires certain 
phrases to be input repeatedly, 
these may be set up as shift-key 
entries. The string expression in 
an LSET may be any string up to 
15 characters. 

I can personally testify that in 
copying a couple of lengthy 
game programs from a book, us- 
ing just three of the LSET com- 
mands (T for THEN, F for GO TO 
and G for GOSUB) saved consid- 
erable typing. 

Another special feature of 
Level III is Line Renumbering. 
This is a flexible command, and 
all of its possibilities will not be 
dealt with here. Suffice it to say 
that typing NAME will renumber 
all program lines, starting with 
10 as the first line and incre- 
menting by 10. Other possibil- 
ities allow you to specify that re- 
numbering begin at a specific 
line, specify new beginning line 
number and specify the incre- 
ment, as well as various com- 
binations of these. 

Now we can make all the in- 
evitable changes and insertions 
in our programs and still end up 
with an attractive looking for- 
mat. All GOTOs, GOSUBs and 
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NEECO (peIJ ANNOUNCES 



400K 



DISK 

STORAGE 
(Before DOS) 



FOR YOUR TRS-80* 
(in a single housing) 




$1295.00 



* 400K Raw Storage 

• Plug Compatible to TRS-80* 

• Uses TRS-80* DOS 

* Available from Stock 



Painted TRS-80* grey • Shipping Wt. 21 lbs 



DEALER and OEM INQUIRIES INVITED 



S. 




NEECO 



^ut 



679 Highland Ave. 

Needham, Massachusetts 02194 

TELEX 951021 



(617)449-1760 

Mon-Fri 9:30-5:30 

Master-Charge & 

Visa Accepted 



*TRS-80 is a trademark of Tandy Corp. 
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OUR PRODUCTS WILL ADD A NEW 
DIMENSION TO YOUR TRS-80'" 

IMPORTANT: All our products are: 
-fully assembled, tested and guaranteed 
-supplied with their own power supply 
-shipped with all necessary cables & coanectors 
-used with Level II BASIC in and out command 

EXPflflDABUS $80 

Now you can hook up to 5 accessories to the TRS-80 
Bus. Can be chained if more than 5 are needed. 
Not a loose board 1 1 

lf1TERFflCGR2 $85 

16 channel I/O module, 8 inputs, 8 outputs, 2 relays, 
2 opto-isolated inputs Very easy to use with BASIC . 
Extensive user's manual included. Sold worldwide for 
over a year. 2 



BLIPPO 



15 tones 
3 octaves 



$39 



The only low cost true synthesizer. Uses BASIC. 
Generates Its own tones and does not tie up the TRS-80. 
Up to 10 notes per second. Built-in power supply and 
speaker. Now it's easy to add sound to any program. 3 

fiOflLOG 80 $112 

8 channel ANALOG TO DIGITAL converter. Anything 
that can be electrically measured can be interfaced to 
your TRS-80 - voltage, current, temperature, pres- 
sure, light level No assembly language needed. 4 



DflC 



$94 



DIGITAL TO ANALOG module. 8 Bit 5% accuracy. 
Latest technology. Use to synthesize wave forms, 
program power supply, control motor speed or light 
levels.. .5 

TO ORDER: Send check or M.O. . Add $3 for S k H. 
PHONE ORDERS: (212) 296 5916 N.V. At* *»D Ta< 

Alpha Product Co. 85-71 79th St. Woodhaven NY 11421 



TRS 80" is o nodemaik o» Tondy Corp 

ALPHR product company 

86-71, 79th ST.. WOODHAVEN, N.Y. 11421 (212) 296-5916 

enclose 50eP&H 
I would like information on 12 3 4 5 6 



Name (print) 

Address 

City 



State 



— Zip- 



other references to line numbers 
within program statements are, 
of course, changed to agree 
with the new numbering. 

When you get an error 
message, you'll no longer have 
to grab for the Level II manual to 
interpret that pesky two-letter 
code. Level III spells out all error 
messages. For those who own 
the Radio Shack expansion 
interface but no disk drive, Level 
III allows access to the integral 
clock-calendar. 

Under the Radio Shack Disk 
Operating System, DATE sets 
the date and TIME sets the time 
of day, which may then be 
accessed by the CLOCK com- 
mand under DOS or TIMES 
under disk BASIC. 

Level III simplifies this proce- 
dure considerably. Type CMD 
"R" and you can then set date 
and time all in one operation. 
PRINT TIMES will then display 
date and time in a 24-hour for- 
mat. TIMES may be used in con- 
junction with RIGHT$,LEFT$ or 
M IDS to access one or any com- 
bination of date, hours, minutes 
and seconds. 

Although BASIC programs re- 
quire decimal numbers, Level III 
will do the converting for you. 
Preface a hexadecimal number 
with &H or an octal number with 
& and conversion will be auto- 
matic. Caution: This will not 
work in DATA statements or in 
response to INPUT statements. 

Probably all of us have ex- 
perienced a system lockout at 
one time or another. Control of 
the TRS-80 is lost and, no matter 
which key you hit, nothing hap- 
pens. You can recover from this 
state by pressing the reset but- 
ton, but if you're using the ex- 
pansion interface, hitting reset 
results in a complete loss of 
memory. Level III allows you to 
use the BREAK key instead of 
reset. Using BREAK will recover 
control and memory will not be 
lost, even with the expansion 
interface attached. 

Graphics 

Level III graphic capabilities 
are considerably advanced over 
those of Level II. Level II requires 
that, when drawing a line or rec- 
tangle, you define all the points 
yourself. In Level III you need on- 
ly define two points on the 



screen and a line or rectangle 
will be drawn between them. 
Level III also allows retrieval of a 
graphics array for storage and 
later use in the same or a differ- 
ent screen area. This greatly 
simplifies the writing of pro- 
grams using graphs, pictures or 
animation. 

Two graphics modes, desig- 
nated Character Mode and 
Graphics Mode, are used in 
Level III. In Character Mode, the 
screen is divided into a grid 
composed of 64 character posi- 
tions across by 16 down. Each 
position is further divided into a 
two-by-three graphics block. In 
Character Mode, any alpha- 
numeric character or any of the 
63 special graphics characters 
may be placed at any specified 
character position using X-co- 
ordinates (0-63) and Y-coor- 
dinates (0-15). Graphics char- 
acters are printed by specifying 
the appropriate CHRS (129 to 
191). 

In Graphics Mode a finer grid, 
measuring 128 across by 48 
down, is used. The Level II func- 
tions SET, RESET and POINT 
are used here. 

The new Level III graphic 
statements LINE, GET® and 
PUT® may be used in either 
Character or Graphics mode. 

LINE is used to draw a line be- 
tween any two points on the 
screen. It will also draw a rec- 
tangle, providing the two 
specified points are diagonally 
opposite corners. In the Char- 
acter Mode, the line or rectangle 
is composed of the first char- 
acter of a string expression that 
follows the specified co- 
ordinates. LINE, followed by two 
sets of coordinates and a string, 
results in a straight line of Xs, or 
whatever the first character may 
be. Adding a "comma B" after 
the string will cause a rectangle 
of characters to be printed. For 
example, 10 LINE (32, 14) (45,10), 
"X", B will print a rectangle com- 
posed of Xs near the bottom of 
the screen and slightly to the 
right of center. Using BF instead 
of B alone will fill in the rec- 
tangle with Xs. 

In the Graphics Mode, SET is 
used instead of the string to turn 
on graphics blocks as in Level I 
or II. Again B or BF may be used 
to outline a rectangle or print a 
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solid white block, respectively. 
With proper use of RESET, black 
graphics may be printed on a 
white background. 

Let me add that these 
graphics are fast! Typing 10 
LINE (a,«H1 27,47), SET, B and 
RUNing will result in a white 
border around your entire 
screen instantly! No more 
waiting for a slow line to be 
drawn. 

GET® and PUT® are ver- 
satile graphics statements. 
GET® allows you to save in an 
array all graphics that are within 
the defined area of the screen. 
Once saved, the graphics may 
be replaced at any area of the 
screen using PUT® followed by 
the desired coordinates. 

There are five options when 
PUT® is used. Using SET in the 
PUT® statement returns the ar- 
ray to the CRT exactly as it was 
saved. RESET reverses every- 
thing. All "on" blocks are turned 
off and all "off" blocks are turn- 
ed on. Using AND will result in a 
block being turned on only if it is 
"on" both on the screen and in 
the array. OR causes a position 
to be turned "on" if it is "on" the 
screen or in the array or both. 
Using XOR, a position will be 
turned "on" only if its status in 
the array is opposite that on the 
screen. 

Graphics arrays must be 
properly dimensioned in order to 
avoid an error message. A one- 
line array requires 64 bytes, 
while the entire screen will be 
1024. A formula is given in the 
manual for determining what 
the needed array space should 
be. 

Other Features 

The following four features, 
which appear to be identical to 
those in Radio Shack disk 
BASIC, will be discussed briefly. 

MID$ in Level III may be used 
on the left as well as the right 
side of an assignment state- 
ment. This will allow you to re- 
place part of one string with an- 
other. 

INSTR searches one string for 
another string. A subroutine for 
this was given in the Level II 
manual. This need no longer be 
used. 

DEF FN, a sad ommlssion from 
Level II, allows user-defined 

►» Reader Service — see page 162 



functions. String as well as 
numeric functions may be de- 
fined. 

Up to ten different machine- 
language routines may now be 
stored simultaneously in 
memory and accessed with the 
USR function. DEFUSR informs 
BASIC of the starting address of 
a machine-language routine. It 
is no longer necessary to POKE 
the starting address, although 
still possible. 

The LINE INPUT statement 
appears to differ from that in 
disk BASIC. According to a 
listing of disk BASIC, version 2.1 
in one of the Radio Shack 
brochures, LINE INPUT is used 
to input a line of data from disk 
into a string variable. 

In level III, LINE INPUT is 
similar to INPUT with added 
features. LINE INPUT assigns a 
string variable name to an entire 
line of input, including commas 
or other punctuation. Everything 
typed before ENTER will be part 
of the string. 

Adding #LEN to either the IN- 
PUT or LINE INPUT statements 
will set a limit on the amount of 
time allowed for response to the 
INPUT. 10 INPUT #LEN 4,100;Q 
will result in the program 
branching to line 100 if Q is not 
entered within four seconds. 
All timing is done in software, 
so the expansion interface is 
not necessary. 

Speaking of the expansion in- 
terface, the system clock is 
prone to bollixing up tape opera- 
tions. The clock should always 
be turned off before a SYSTEM, 
PRINT#-1 or INPUT#-1 op- 
eration. Entering CMD "T" will 
turn the clock off, and CMD "R" 
turns it back on. LOAD and 
SAVE do their own turning on 
and off automatically. 
PRINT #-3 allows output to a 
printer or other peripheral that 
may be attached to your RS-232 
port. Input from the port will still 
require a machine-language 
routine. 

Level III BASIC appears to be 
a worthwhile acquisition for any 
serious TRS-80 user, especially 
one who would like the power of 
disk BASIC without the added 
expense of a disk drive. Add in 
all the extras not contained in 
disk BASIC, and it becomes de- 
sirable even for a disk owner.B 
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If you spend more than a few minutes 
with your TRS-80® you will welcome this 
inexpensive accessory. 

• ••••• 

First we made it for ourselves. Since we 
spend many hours with our four 
systems, we were looking for a way to 
get a better display, more like the green 
phosphor of our big brothers. We found 
that a certain optical band-pass filter 
gave excellent results. We were so 
pleased with it that we decided to make 
it available to others. 

****** 

The GREEN SCREEN will: 

• IMPROVE IMAGE CONTRAST 
e REDUCE EYE FATIGUE 

• DECREASE GLARE 

• ENHANCE SCREEN LEGIBILITY 

• PROVIDE A MORE PLEASING 
DISPLAY 

• GIVE A DISTINCTIVE PROFESSIONAL 
LOOK TO YOUR SYSTEM 

The GREEN SCREEN is custom molded to 
fit nicely over the TRS-80" picture tube. 
It ingeniously mounts in seconds without 
any tools. 

****** 

The GREEN SCREEN: 

e Can be removed if needed 

• Doesn't void guarantee 

• Won't mar nor mark the unit 

We know from our own experience that 
you will be very pleased with your 
GREEN SCREEN. 

TO ORDER: send S12.50+ S2 S&H to: 
Money Back Guarantee 

• 262 
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w ALPHA product co. w 

85-71, 79th St., WoodhMfl, M.Y. 11421 
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Phone Orders: (812] 296-5916 
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APPLICATION 



With the price of gas it makes 

sense to share a ride to and from work. 



Carpool 



Walter K. McCahan 
PO Box 3314 
Shiremanstown PA 17011 



While driving to work and 
contemplating nontrivial 
uses for my TRS-80 microcom- 
puter, I noticed that almost 
every car on the road was oc- 
cupied by only one person. 
Keeping in the mind the high 
cost of gasoline and other 
automobile operating expenses, 
I felt that a bit of research was in 
order. 

After a hasty and short survey 
of a local office building, I found 
that the overwhelming reason 
that car pools had not been 
formed was the employees' lack 
of knowledge as to which other 
employees lived close to them 
and were available to form a 
pool. I also found that the 
employer was willing to pay a 
healthy sum to provide their 
employees with the information 
with which to form car pools. To 



attack and solve this problem I 
devised the following plan of 
action: 

1. Find the home address of 
each employee. 

2. Reduce these addresses into 
zones. 

3. Write a program to match 
employees that live close to one 
another. 

4. Give each employee a list of 
these other nearby employees 
and instruct them to form car 
pools. 

Stepl. 

Gathering personal informa- 
tion from the employees in this 
building was not a difficult task 
and was accomplished by the 
letter shown in Fig. 1. The letter 
was copied on the company's 
copy machine and was distribut- 
ed with each employee's payroll 
check. 

I found that since there was a 
direct savings to them, the 
employees were quick to com- 
plete the information and return 
the questionnaire. 

Step 2. 

After looking into several 
methods of relating addresses 
to locations, including the name 



Fellow Employees. 

In these limes it is no longer economical tor each employee to drive his or her car 
lo work alone 

In an effort lo conserve gasoline (and therefore moneyi your company is pro 
vidmg a computer service that will match your name with other employees that 
work with you m order that you can form a caipooi 

Attached you will find a map of our local area which has been divided into 16 
zones You will also find Delow a form that is to be clipped and returned to the per- 
sonnel department after it is completed 

All items on the form are self-explanatory except for the one labeled Zone in 
this blank you should enter the number of the zone in which you live according to 
the numbers on the map. If you do not live within one of the zones, enter the zone 
nearest to your home. 

After all of the lorms have been returned and entered into the computer you will 
be furnished with a list of names and instructions on how to setup your carpool 

Sincerely 



The Management 



CARPOOL QUESTIONNAIRE 



STREET ADDRESS 
CITY & ZIP 



TELEPHONE NO 
ZONE 



SHIFT, 

BUILDING 



Fig. 1. Gathering employee information. 
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of the town and zip code, it was 
decided that a completely inde- 
pendent method of zoning must 
be developed. 

Using a map of the local area 
(Harrisburg PA), I produced a 
grid of 16 sections (see Fig. 2). 
Each zone on this grid repre- 
sents 225 square miles, so that 
the entire grid represents the 
3600 square miles centered on 
Harrisburg, an area of about 1.5 
million people (unless we have 
another problem at Three Mile 
Island). 

Each employee was provided 
with a copy of this map and was 
instructed to enter the proper 
zone on the questionnaire. 

Step 3. 

To accomplish matching 
employees the following Level 
II, TRS-80 program was written. 
Before getting into a general 
discussion of the program, it 



would be well mentioning a 
somewhat unorthodox method 
of saving and loading data to 
and from tape. When first look- 
ing at the program, it is surpris- 
ing that only one array is dimen- 
sioned -line 50. This is all that 
is necessary since all informa- 
tion for each record is con- 
catenated into one string called 
N$. This is done at lines 390 or 
410. By using this method, 
record and retrieve times to and 
from cassette tape are greatly 
reduced. 

The Program 

Lines 10 through 220 contain 
the program header, initialize 
the program, print instructions 
and print the menu of functions 
available. The multiple branch 
statement in line 230 sends the 
pointer to the proper section of 
the program as selected from 
the menu. 



Car Pooling program 



ARE AVAILABLE FOR Cftft f0 



llttHt 



):N2t'N2t4H2t 



>:»3« 



*• ' »» TRS-80 LEVEL II •• 

43 CLEAR 8800 

SO DIM N0( 81 1 

40 cls:print:frint:print"this procram hatches hides 

OlInc : print 

/« print' the output of the program mill ie the name and address 

80 print'of the person for whom » hatch is sought followed it a" 

90 print-list of first choices then a list of second choices.' 

100 print'and a list of third choices. the person should be' 

110 print-given the list along with instructions to contact it*- 

120 print-the listed people' in order, and arrance a car pool - 

140 print:print:print:print:inpuI' to proceed press enter- i> 

iso cls:pri«t:print:print-the following functions are available:- 

1*0 PRINT- 1. ENTER OR ADD TO A LIST OF NAMES 

170 PRINT' 2. HAKE CORRECTIONS TO AN EXISTING NAME 

180 PRINT- 3. FIND A HATCH' 

200 PRINT' 4. SAVE A FILE ONTO CASSETTE 

.'10 PRINT" 5. LOAD A FILE FROM CASSETTE 

220 PRInT:priht IINPUT'EHTER THE NUMBER OF YOUR CHOICE'IX 

230 ON x GOTO 300.300.800.1200.1400 

300 CLS:PRINT:PRINT:PRINT:INPUT-ENTER THE NUMBER of makes already OH THE FILE' 

310 CLS!PRIMT"INTER THE PROPER INFORMATION IN K|#P0NSE TO EACH PROMPT- (PRINT 

315 FOR I-IM TO 80 

320 INPUT-NAME" INltlPRINT 

325 h1>3*-lEN< Mil i:Ht-STRIMCt< Hit- ■ 

330 INPUT-STREET ADDRESS' IN2t:PRINT 

33" H2»30-LEN< N2» >:h2««STRINC»» M2. ' 

340 INPUT-CITY ( *IP->N3t:P«INT 

345 N3=30-L£N< N3t ):N3B*STRINCt< M3. ' 

350 INPUT" TELEPHONE NUHKR* 1N4»:PRINT 

355 H4-IS-LEJK H4» >:H4«.STRINC»<H4.- ' > :N4t.N4t«H4l 

300 INPUT- ZSRE-INSt 

370 PRINT: IHPUT-DO YOU HAVE ANOTHER NAME TO ENTER" iO* 

380 IF 00- "NO" GOTO 4 10 

300 N«C I >>Nlt»N2t*N3t4N4t»N3l 

400 CISINEXT I 

410 NtC : >-NlttN2t«N3t»N4t4N3t 

420 PI- I 

430 GOTO 110 

MO ' 8* CORRECTION MAtMUTM tS 

310 cls!PRInt:print 

520 input- enter name for which correction i* to ie hade'isi 

322 POKE 14422. 88:P0KE 10423.4 

323 Ml -30 -LEW SO > INt-STRIMCK Ml . - ->:S»-OtlM« 
330 FORI'ITOPIIIF LEFT*<Nt< I 1.30 >-St GOTO 370 
333 NEXT I 

340 cls:print SOI' not found ON FILE' 
330 PRINT: INPUT' WANT TO TRY AGAIN* IO< 
533 IF QO'-NO' COTO 130 
340 COTO 300 
570 COSUI 3000 

380 cls:print-lach line of infomation hill 8e displayed as' 

500 print- it appears on the file. if it is to ie corrected' 

4s0 print-the correct information should k typed ih. if' 

a10 print-no correction is to ie made to that line press enter' 

420 print:print nio 

430 INPUT N10 

433 M1-30-LENI Nit KN»-STRINCO< MI." ■ ):N1 t«Nl t«Ht 

440 PRINT N20 

650 INPUT N2t 

433 H2-M-LENI N2t ):M2t-STRINCtl M2.' - )!N2t-N2t4M2t 

640 PRINT N3t 

670 INPUT N3t 

675 N3'30 LEW H3t >:N3t»STRlNGt< M3." ' )lN3t-N3t4M3t 

480 PRINT N4t 

400 INPUT H4t 

495 M4.15 LEN< N4t ):M41.STRING*<M4.- ' ) : N4t'H4l »N4t 

700 PRINT NSt 

710 INPUT NSt 

713 N«< I >=Nlt«N2t»N3t«-N4t»N3t 

720 CLSIPRINT - FOLLOWING IS THE CORRECTED FILE" 

730 COSUI 4000 

735 POKE 14422. 141 :PORE 14423.3 

740 PR INT: INPUT 'DO YOU HAVE ANOTHER CORRECTION TO NAKE'IOt 

73« IF OI--TES- C0T0 3»« 

700 GOTO 130 

800 • •• MATCH A SPECIFIC PERSON tl 

810 cls:print:print:input-enter name for which a match is soucHi-ist 

815 H1-30-LENI St KHl -STRINCtl Ml .' "USt'SBtHt 



820 FOR I 1T0 F1IIF St-LE'Tti Nt< I ).30 ICOTO 840 

823 NEXT I 

830 FRINT Sti" NOT FOUND ON FILE': GOTO 020 

840 COSUI 3O0O 

845 N9t N3t:N-j«VALlN5l; 

850 COSUI 4000 

840 LPRIHTILPRINT" FOLLOWING IS A LIST OF POSSIBLE RIDES FOR TME" 

870 LPRINT- PERSON NAMED ABOVE. THE RIDES LISTED UNDER FIRST- 

380 LPRINT- CHOICE ARE MOST DESIRABLE. BUT THE SECOND CHOICIS" 

890 LPRINT" ARE ALSO VERY BENEFICIAL " 

900 COSUI 5000 

VIO COSUI 6000 

920 print :print:infu'-m rou have another name io match- tot 
930 it at. "YES" CUTO 800 

940 GOTO 130 

1200 «» save onto cassette it 

1210 cls:print:print:print 

1220 input-when cassette is ready press enter" l« 

1230 cls:pr:nt:print:print 

1240 print-now recording onto cassette' 

1230 FRINTi-l.Pl 
1260 FOR l»l TO Fl 
1270 PRINTO-1. Nt( I I 
1280 NEXT I 

1290 cls:fpint :print:print 

1300 infli'- recording now complete - press enter to proceed' ii 

1310 GOTO 150 

1400 ' II LOAD FROM CASSETTE •• 

1410 ci .s:frint :print:print 

1420 INPUT-WHEN CASSETTE IS READY PRESS ENTER" II 
1430 CLS 

1440 print:print:print:prinT'now loading from cassette- 

1445 INFUTt-l.Pl 

1430 FOR II TO Pi:lNPUT»-l.Nt( I >:next I 

1460 cls:print:print:print' loading now complete" spi »- items oh the file- 
1470 print:print:input -press enter to proceed- ix 

1480 COTO 150 



u: ■ 


II 


TO BREAR DOWN STRINGS 


• I 




M 1 " 


»1 t'LEFTtC N«< I 


1.30 > 








!0. ' 


N2t = MIDt( Nt( I 


.31.30 1 








• ; : .; 


N3t-HIDt< Nt( I 


.61.30 1 








3040 


N4fMIDt< Nt< I 


.91.8 ) 








3030 


N5t-RIGMTt(Nt( 


I It2) 








JO 53 


SW-1 










•.:-.■: 


RETURN 










> . 


It 


TO PRINT A RECORD 


II 






<: '. : 


LPRINT.'LPRINT 


TABl 10 INltlLPRINTTABI 10 >N2t: 


lprinttabi io >N3t: 


LPRl 


4TTAB. 10>N5t 










«♦; ; 


RETURN 
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TO SELECT FIRST CHOICES 


• • 




3003 


LI RlNI ILFR1NT 


lprinT- 


FIRST CHOICES' 


1LPRIN 


5010 


FOR I" I TO HII 








501', 


GOSUI 3000 










30 20 


IF N9t-NM ANI 


St Nit GOTO 5030 


ELSE GOTO 


5040 




30 10 


COSJI 4000 










303', 


su-o 











30 4 NEXT I 

3050 RE TURN 

4000 ' II TO SELECT SECOND CHOICES »l 

4003 LPRINT ILPRINT ILPRINT' SECOND CHOICES' :LPRINT 

6010 FOR 1-1 TO PI 

6020 R.VAL( Rir.HTt<Nt( I 1.2 11 

6030 IFR=2AND N3* 1 GOSUB3000 

6040 IFR 3 AND N5 1GOSUB3000 

6050 IFR.4ANDN-.MGOSUB3000 

6060 IFR'lAND N5 2COSUB3000 

6070 IFR-3AND M3' 2GOSUI3O00 

6080 !Ffi«3ANDNfi : 2l.OSUI3C00 

6090 |FF-6ANDN!,.2i;OSUB3000 

6093 IF R'7«NIiN5-. , GOSUS3000 

6100 IFR:2ANDN3-3f.ObLB3000 

,-.110. IFF,"4ANrNr.3l'.OSU»MeO 

6120 IFR'tANPMS-'IGOMIiMM 

41 JO I'R- 7f NDN'> V.OSUB3000 

6140 IFF- 8ANDNV JC.ISUBJOOO 

6150 IFR 3ANDN'.-4r.nSUBJ*00 

4140 IFR. 7flNDN',-«(,JSLB3000 

6170 IFR 'MNBM9 4GOSUB3000 

6180 IFR. 1ANDN3.3GOSUB3000 

6190 IFR.2ANDN5-3GOSUB3000 

6200 IFR:6ANDNr,>5GOSUt3000 

4210 IFRr9ANDN3=5COSUB3000 

4220 IFR 10ANIINS-SCOSUB3000 

6230 IFR 1ANDN5'6COSUB3000 

6240 IFR;2ANDN5-4GOSUB3000 

6230 !FR--3ANDN3=4GOSUB3000 

4260 IFR-3ANDN3=6GOSUB3000 

6270 IFR=7AN[iN3"*i;OSUB3000 

6280 If R-9ANtiN',.6(.OSUB30O0 

6290 IFR- 10ANDN5-4GOSUI3000 

6300 IFRM1ANDN5=6G0SUI3000 

6310 IFR-2ANDN3-7GOSUB300O 

6320 IFR-3ANDN5-7COSUB3000 

6330 IFR=4ANDN3'7r.OSUB300O 

6340 1FRT4ANDNS.7GOSUI3000 

6350 IFRz8ANDNS-7GOSUB3000 

4360 IFR--UANDN3'7GOSUI3000 

6370 IFR. 11ANIin5'7GOSUI3000 

6380 IFR^12ANDN3=7G0SUI3O0O 

6390 IFR=3ANDN3-8GOSUB3000 

6400 IFR.4ANDN3-8GOSUB3000 

6410 IFR'7ANDN5'8GOSUB30«0 

6420 IFRMIANDNS-BCOSUIJOOO 

6430 IFR=12ANDN5-8GOSU»3000 

6440 IFR.3ANDN3t9GOSUB3000 

6450 IFR=6ANDN3=9GOSUB3000 

6460 IFR- 10ANDN3-9GOSUB3000 

6470 IFR.13ANIiN5'9COSUI3OO0 

6480 IFR.I4ANDN5t9GOSUI3O00 

6490 IFR=5ANDN3"10COSUI3000 

4300 IFR-6ANDN5'10COSUI3000 

6510 IFR=7ANBN3M0COSUI3000 

6520 IFR'9ANDN5'10COSUB3000 

6530 IFR- 11ANDN5* IOCOSUI3000 

6540 IFRxl3ANDH3"10GOSUI3000 

6550 IFR- 14ANDNSM0COSUI3040 

4340 IFR- 13ANDN3-I0C0SUI3000 

4570 IFR=6ANTJN3-11C0SUI3000 

4380 IFR=7ANDN5-11G0SUI3000 

4390 IFR-8ANDN3-11GOSUI3000 

4400 IFR--10ANDN5-I ICOSUI3000 

4410 IFR.12ANDN5-1ICOSUI30O0 

4420 IFR<14ANDNS=11COSUI3000 

4630 IFR'15ANDN3-11G0SUI3000 

6640 IFRM4ANDH3''1!COSUB3000 

6650 IFR<7ANDN5-12COSUI)000 

6660 IF(..8ANDN3'12GOSUI3OO0 

6670 IFR'11ANDN3»I2COSUI3000 

6680 IFR. 15ANBNSM2CDSUI3000 

6690 IFR'16ANDN5-12COSUI3000 

6700 IFR- 9ANDN3-13COSUI3000 

4710 IFR- 10ANDH5-13GOSUI3000 

6720 IFR- 14ANDN5-13COSUI3000 

6730 IFR--9ANDNS-14GOSUB3000 

6740 IFR--10ANDN3-14COSUI3000 

6750 IFR.11ANDN5'14GOSUI3000 

6760 IFR= 13ANDN3. 14GOSUI3000 

6770 IFR-15ANDH3>14GOSUI300I 

6780 IFR=10AHDN5"I5COSUI300* 

6790 IFR'11ANDN5«13GOSUI3000 

4800 IFR-12ANDN3-13GOSUI3400 

6810 IFR'14ANDN5-13G0SUB300* 

4820 IFR'14ANDN3-1SGOSUI30»* 

4830 IFR' UANDN5M4COSUI3000 

4840 IIR=!2ANDN3=14GOSUI3O00 

4830 IFRM5ANDNS'14GOSUI3O00 

6860 IF SW-lANDSt' N1IC0SU14000 

6865 SW-0 

6870 NEXT I 

6880 RETURN 



Scanned by Ira Goldklang - www.trs-80.com 
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Lines 300 through 430 accom- 
plish the function of building or 
adding to a file of data. Each line 
of data is prompted by the pro- 
gram, and the operator need on- 
ly answer each prompt to build a 
file. Lines 325, 335, 345 and 355 
set the size of each line. The 
string sizes of name, street, city 
and zip are set at 30 characters 
each, while the telephone num- 
ber has a field of 15 characters 
and zone is left at either one or 
two characters, depending on 
the zone entered. This field siz- 
ing is done by adding "null 
characters" up to the field size. 

The reason behind all this 
string manipulation is to ensure 
that each data element such as 
name, address, city, etc., starts 
at the same position in the array 
containing the N$ variables. 
This must be done so that the 
portion of the program that 
breaks N$ back into the various 
fields knows where to start look- 
ing for each data element. 

Lines 500 through 760 allow 
changes to be made to data 
already in the file. Here again 
each string is set to size and 
concatenated after the correc- 
tion is made. Lines 800 through 
940 are used to establish and 
print out the desired relation- 
ship between the zones of the 
employees in the file. 

The subroutine in lines 3000 
through 3060 is used to break 



JAMES P SMITH 
814 B STREEN 
NILLERSTOWN PA 17777 
766-2311 
1 


SMELITM61 

10 BRIDCEVIEH 

KW 8L00HFIEU PA PA 17515 
733-3311 
5 


RICHARD QUINN 
1111 MARCH RD 
LINGLESTOWN PA 17100 

777-8282 
7 


HENRY HERD 

72 WYNCATE RD 

MIDBLETCWN PA 17043 

739-0*21 

11 


WILLIAM NELLAN 
12 HERO CIRCLE 
NEWPORT PA 17489 
766-1818 
1 


JOHN DAT 
123 CESAR COURT 
HEN BLOOMFIELD PA 17515 
733-1977 
5 


TFJ BARD 
5 OAK DRIVE 
HERSHEY PA 17119 
233-2347 
8 


HAFY WARD 
12 OLD MILL 
STEELTON PA 17144 

739-1109 
11 


HOWAfcDCARR 
17 SOUTH RD 
LIVERPOOL PA 17332 
737-2218 


MARTIN HACK 
75 LEE ST 

ELLIOTSMUC PA 17512 
733-7119 

r 


THOMAS CORRY 
2022 SOUTH ST. 
RALHYRA PA 17087 
234-5044 
8 


COWARD KOONS 
400 BAKER 3T 
ELIZAKTHTOUN PA 17771 

739-9478 
12 


HAROLD RISKIN 
18 ROBERTS RD 
•1ILLERSBURC PA 17505 
741-4140 
2 


CHARLES MARCH 
12 MALLARD *W 
DUNCANNON PA 17485 
733-0 til 
6 


MICHAEL FANE 
12 HAYWOOD AVE 
HERSHEY PA 17119 
233-7111 
8 


ROGER GREENWOOD 
11 PHILLIPS AVAE 
LAI MORE PA 17041 
737 2391 
13 


WAYNE LHEU 
4717 WILLOW RD 
HA1LFAX PA 17535 
741-9494 
2 


ROBERT LONG 
828 PARK 

DUNCANNON PA 17085 
733-4414 
4 


PAX HERBERT 
1214 STONER BR 
CARLISLE PA 17212 
234-1211 
9 


NANCY WELLS 

646 BEJHFRD 

[ACT BERLIN PA 17222 

739-1904 

14 


iJJO.NL LACK 
22 CENTER HILL DR 
ELIZABETHVILLE PA 17199 
741-7714 
3 


LEE PARKER 
144 SHIREHONT DR 
ENOLA PA 17099 
733-73*9 
4 


Mull HOOVER 
3 ARBAN CIRCLE 
MECHANICSBURC PA 17177 
234-4427 
9 


RITA ULHER 

4 WEST AVE 

CLEAR SPRINGS PA 17219 

744-3982 

14 


ALBERTA A CHASE 
U MEADOW LANE 
ELIZABETHVILLE PA 17199 
741-1141 
3 


■-:;.' olson 
111 carrol st 
harr1sburc pa 17419 

777-4219 
7 


DANIEL HAWKINS 
1212 SPRING ST 
CARLISLE PA 17212 
234-2985 

9 


MARK WILLIAMS 
13 LINCOLN WAY 
YORK PA 17843 
7337-190 
15 


KENNETH WIN 
y«3 WALTERS LANE 
PINE GROVE PA 17212 
737-7311 
4 


ALAN ROTH 

73 BROWNING HI 

HARRISWRC PA 17108 

777-7272 

7 


GERALD GREEN 

3 MAYS AVE 

NEW CUMBERLAND PA 17070 

744-9312 

10 


ROSE SIMONS 
18 BLAIR AVE 
YORK PA 17841 
741-1002 
15 


PHILLIP BURNS 
181 PINE ST 
WILLIAHSTOHN PA 17222 
737-1921 
4 


BRUCE BROUN 
67 KENWOOD AE 

HARRiaURC PA 17108 
777-9891 
7 


JAMES ALEXANDER' 
42 GRANITE RD 
CAHR HILL PA 17011 
744-4102 
10 


RICHARD SWORE 

OLD ORCHARD RD 
WKICHTSVILLE PA 17759 
737-7288 
14 




Fig. 3. Sample list of employees. 





down the concatenated string 
N$ back into the various ele- 




H^£>! 



Fig. 2 Grid map of Harrisburg PA area. 



ments represented by N1$, N2$, 
N3$, N4$ and N5$. The actual 
printing of the data elements 
contained in strings N1$ 
through N5$ is accomplished by 
the subroutine in lines 4000 
through 4020. 

First choice matching — 
where the zone is the same as 
that for the person being 
matched -is done by subrou- 
tine 5000 through 5050. The ac- 
tual matching of zones is in line 
5020. This line also prevents the 
printing of the person being 
matched as a choice. 

The subroutine in lines 6000 
through 6880 selects the sec- 
ond-choice matches. A name is 
selected as a second choice if 
his zone is adjacent to the zone 
of the person being matched. 

Using the Program 

In order to ensure the least 



complicated operation, the pro- 
gram is written in the "tutorial 
mode," that is, the operator 
need only answer the questions 
displayed by the computer in 
order to run all of the functions. 

Function 1— This function is 
used for initial entry of data into 
the file and is a simple matter of 
entering the required informa- 
tion in response to the ques- 
tions, "NAME?", "STREET 
ADDRESS?", "CITY & ZIP?", 
"TELEPHONE NO.?" and 
"ZONE?". The information is 
entered directly into the com- 
puter from the questionnaires 
returned by the employees and 
need not be in any particular 
order. The file is closed upon 
answering "NO" to the question 
"DO YOU HAVE ANOTHER 
NAME TO ENTER?" or upon 
reaching 80 names on the file. 

Function 2 — Since most op- 
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PROFESSIONAL 




BUSINESS MICRO LIBRARY 



Professionally developed and field-tested business and accounting software for 
your *TRS-80 Model I or II from the acknowledged leader in micro-business 
systems. 



CBOOK/80 THE ELECTRONIC BOOKKEEPER 

Single-entry bookkeeping system with a chart of accounts which matches Federal 
Income Tax Schedule C (Profit or Loss from Business or Profession) 

Develops standard-format Profit & Loss Statements throughout the year and 
automatically produces a full Schedule C in IRS-approved format at tax-filing time. 

DEPCOMP/80 DEPRECIATION COMPUTATIONS 

Computes depreciation of depreciable assets by any (selected) method. Prints out 
depreciation schedules for asset's life, or for selected years. 

Stores client's entire asset list and prints out his complete yearly depreciation 
schedule. Lrsts are updatable as required. A must for the busy accountant or tax 
practitioner. 

ASSETS/80 ASSET TRANSACTIONS 

Accepts entry of mixed long and short term asset transactions, computes holding 
period from dates bought and sold, and prints out separate long-term and short-term 
transaction lists, ready for inclusion in Schedule D at tax time, or for determination 
of the client's position for any period. 

LOANCOMP/80 LOAN COMPUTATIONS 

Computes interest and principal balance for monthly, annual, and loan total periods. 
Computes payments required to amortize a loan. Makes the "True Annual Percen- 
tage Rate" computation! Has a separate section which analyzes ordinary annuities 
with monthly, quarterly, semi-annual, and annual payments. 

For any of the above, prints out summarizing statements or your choice of three 
types of amortization schedules. 

We recommend this program to anyone in the accounting professions or concerned 
in any way with financing. 

STATEMENT/80 PREPARES ITEMIZED STATEMENTS 

of any desired form (Profit & Loss, Rental Income, etc.) and prints out the form, with 
computations made automatically. 

FORMLET/80 FOR PREPARING FORM LETTERS 

from a selection of pre-written and stored stock paragraphs. Will store up to ten of 
such letters on disk and allow you to select among them at will. You may intermix 
fresh text, of course. 

TYP/PRT/80 SMALL BUT MIGHTY 

Not only permits use of the printer as a typewriter but will allow you to retain any 
display already on the video, make notes from it, or actually copy it on the printer 
automatically. This program will run concurrently with another program you may be 
using and you can go from one to the other at will. Also contains a calculator. So 
useful it is hard to describe here. 

• • * * • FOR DISK BASED SYSTEMS ONLY* • * • • 

Write on letterhead, or call, for free 
brochure and sample outputs. 

*TRS-80 is a registered trademark of Tandy Corporation 

CONTRACT SERVICES ASSOCIATES 



Model 1 


Modem 


169.95 


199.95 


189.95 


219.95 


189.95 


219.95 


67.95 


97.95 


37.95 


47.95 


47.95 


57.95 


17.95 


24.95 



^10 



706 SOUTH EUCLID 



ANAHEIM, CA 92802 



TELEPHONE (714) 635-4055 
• • * 20 YEARS OF SERVICE • • • 



^Reader Service - see page 162 
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for the TBS- 80 from Micro -Mega 




• Speed up your cassette tap* handling • Pinpoint program locations on lapa with an audible monitor e 

Get protection Irom recording and playback glitches resulting Irom ground loop* • Eliminala the tedious 

plugging and unplugging of racordar capiat 

Tha Micro Mega Caatatla Control Unit doaa all this and mora. You gat Mil tanl 

manual control ol tha racordar at tha Hick ol a twitch. Want to find the 

baginnmg or and of a program' 9 Flic* another twitch and you'll hear it All 

capiat remain pluggad in all tha lima 

Tha Micro Mega Ca**atta Control Unit doa* a lot to improva tha appear- 

ancaot your TRS-BO tyitem. too At thown. it't in a 2'H" * S" boa which 

snuggles baiwaan tha kayboard and your racordar Thara it no naad to 

move tha racordar. and all cables coma neatly into lha unit. Tha Cassette 

Control Unit it tailored to tha CTR-41 racordar. but may Be used with moil 

other racordar* a* wall 

CASSETTE CONTROL UNIT. $37.95 

Add Si. 00 lor postage and handling 

cpu Mown o w 

Ever Imd your sal I with a blank tcraan wondaring what your computer is up to'' Tha Micro Mega CPU Monitor 

can tall you. lor example • II your CPU i* in a loop with no aalt, • When a long tort it naanng completion. 

or • It a kay Pounces during kayboard input Tha CPU Monitor lets you listen to all CSAVE* and CLOADt 

and will halp you quickly Imd tha correct recorder volume tatting II you have an et pension interlace, you 

will alwayt know whether tha realtime clock it on or oil because you can haar it 

Tha Uicro Uega CPU Monitor gnat a voice to tha Z-tO microprocessor in 

your TRS-SO by uting AM radio circuitry to pick up tha computational mm r 

rhythms of lha CPU. which are amplified and played through a loudspeaker g 

Tha pickup unit ol tha CPU Monitor, thown at Halt in tha photo, goat under ^^^^ 

tour TRS-ao Keyboard II is connected by a 36' cable to the speaker and ^fi^k V 

control unit, which mcludat an on/off volume control and an LEO "power- ^^^^P ^tW 

on" indicator Tha Monitor i* powarad by an AC adapter, shown at right in 

tha photo Mo batteries are needed and no electrical connections to your 

TRS-eV are raquirad 

By listening to lha CPU Monitor, you will soon become familiar with tha "peraonelitiei " ol tha program* you 

run and whether the, are aaaculmg m a normal way A dramatic uta ol lha CPU Monitor is in lha great 

enhancement which it provides tor computer garnet iSaa "Gaming Environment" below I 

CPU MONITOR $47.95 

Add $2.00 lor postage and handling 



TMI 



I like those featured by ear 



Tha e,e p, easing Green Screen tilt over tha CR T ol your TRS40 y,dao Display and gnat you improved 

tratt with reduced glare You gat bright, tummout green BJMBJKj anrt graphic* like those laaturad by vary 

a i pensive CRT umtt 

Tha Green Screen it clotaly matched to tha color and tenure ol tha TRS SO 

video Oi*play and improva* the overall appearance ol your system itii at 

tachad with adhesive *tnp*. which do not mar your display unit in any way 

Tha Micro-Mega Green Screen gne* improved video display visibility lor all 

application's and is especially e/tactna in creating dramatic, high-impact 

displays lor computer games tSee 'Gaming Environment' below i 

THE GREEN-SCREEN $13.95 

Add $1.00 lor postage and handling 

TMt UtTWXATl MM TWPC PACXAflt 

Tired ol trivial computer games' Thit complete Star Tret package will provide you with endless latcmalion 

and cha l lenge In addition lo the program cattatta. H mcludat comprehensive instructions a pad ol 

"Voyage Log" record thaatt. and a Iraa-ttanding "Torpedo and Maneuvering Chan " 

The package is built around the latest version ol t ance Micklus mcom 

parable Star Trek III. a 13.000 byte program with a host ol subtle and imag 

• native features which include numerous dynamic and spectacular graphic 

displays Star Trek III put* you in command ol tha Entarprita cruising in a 

gaiavy ol 192 quadrants lilted with uncharted hazards, including hostile 

Klingont. pulsars, and black holes You have at your disposal scanners. 

various weapons and detente systems, on board computers, and a loyal 

crew (You will naad them all lo survive tha Klingont.) 

Your mission it lo rid tha region ol Klingont and to locate live inhabitable planets, ell within 300 ttardayt. 

before returning lo Star fleet Headquarters where your overall allectnenett at a ttarthip commander will 

be scored High scores arm possible only with caralul planning and effective bailie tactics Tha "Voyage 

Log" sheets will guide your strategy and tha "Torpedo and Maneuvering Chart" will give you a vital edge in 

combat. (When you engage three Kllngon thiol you can't afford lo mitt.) 

STAR TREK PACKAGE (for Laval II, 16K only). $22 95 

Add $1.00 lor postage and handling 

CREATE YOUR OWN SPECTACULAR 
O AJXWO EMV mOWMPf T (and amam M.OO] 

The Enterprise I* in battle trim with deflector shields at full power A* her captain, you are taking her ,nm 
combat Tha battle stations siren ring* in your ear* and "CONDITION RED" flashes on your monitor screen 
You call lor warp drive end key in the coordinates ol the Quadrant where your scenner* have detected Kling- 
on ships A* you select the warp factor, you hear the reatturing clicking of your navigational gear at it ac- 
tnetet the werp drive 

Suddenly, you break out ol hypertpace and your monitor displays the chilling tight ol three Klmgon Battle 
Cruisers floating on your screen I Then evil shapes glow in luminous green against the black void ol space 
Momenta later, you heer the characteristic leaping sound of Klmgon later weapons, and. •< you welch. 
high energy beams come knifing toward the Enterprise in succession from each of the Kungon *hip* 

You here been hit ' Vou heer the ditmel toundol the damage control alarm at "DAMAGE TO WARP DRIVE " 
and "DAMAGE TO PHASERS"tle*h on your screen The Klingont have tlopped firing 1 The Enterprise it 
crippled, but your belt weepon it stiff intact, and ill your turn now' Vou key m the commend for photon 
torpedoes At your tcraan again di*p4ay* the petition of the Klmgon *hip*. you teeact a tiring vector Irom 
your torpedo Chan and kei it hi Now you heer the buzz ol your photon torpedo et you see it s peeding toward 1 
a Klmgon ihip it strikes him deed-center' At you watch, the Klmgon Battle Cruiier ditmtegretet. accompe 
mod by a *ati*tymg crackling *ound 

Does the above scenario sound far latched'' Nor at an Us* small sample ol what you will experience with 
Micro Mega s Gaming environment which consists ol • The STAR TREK PACKAGE • The GREEN 
SCREENand • TheCPU MONITOR The last paced and dynamic action reflects the superb Star Treklllpro 
gram together with the Voyage Log ana "Torpedo Chart' ol the Star Trek Package All of the unique 
graphic displays are greatly enhanced by the Green Screen Finally, the uncanny sound ettects are pro 
duced by the CPU Monitor which faithfully picks up the FOR. NEXT loops and other CPU patterns which 
create the distinctive siren sounds thet accompany the ALERT and DAMAGE messages along with the 
harsher notes ol the weapons salvos Once you ve tried *X you won't any longer be satisfied wiih silent com 
outer gemes 

Remember that with the Gaming Environment you also get all ol the other eiceiient features of the CPU 
Monrtor and the Green Screen lor non gammg applications You also save Sb 00 oil the combmed cost ol 
the individual items 

GAMING ENVIRONMENT. 579.85 

Add $3.50 lor postage and handling 



Terms: Check or money order, no CODs or credit cards, please. Add amount 
shown lor postage and handling to price ol the item. All items shipped within 48 
hours by lirsl class or priority mail. Virginia residents, add 4% sales lax. 



Micro -Mega • P.O. Box 6265 ■ Arlington, Va 22206 



orators are not trained typists, I 
felt it was necessary to allow a 
simple means of correcting in- 
accurate data. Entering the 
name of the person for whom 
the data is to be corrected will 
result in each line of data being 
displayed— one at a time— ex- 
actly as it appears on the file. If 
that line is to be changed, the 
correct information is typed in. 
If no correction is to be made to 
that line, the operator may move 
on to the next line simply by 
pressing enter. After all correc- 
tions have been completed, the 
entire corrected file is dis- 
played. 

Function 3-This function 
prints out the name, address 
and telephone number of the 
person for whom a match is 
sought, followed by short in- 
structions, then a list of first 



choices and then a list of sec- 
ond choices. 

To illustrate this function the 
lames appearing in Fig. 3 were 
entered using function 1. The 
results of the matching, using 
function 3, are shown in Fig. 4. 
As can be seen by this example, 
first choices are those em- 
ployees that have the same 
as the person for whom a match 
is being sought, while second 
choices are those who live in a 
zone which is adjacent. By 
studying the zoned map and 
comparing it to the chart in Fig. 
5 you will see this relationship. 

Functions 4 and 5 — These 
functions are straight-ahead 
applications for saving and 
recalling data to and from a 
cassette file. As explained 
above, this process is shorter 
than usual due to the fact that 



Fig. 4. Sample run. 



HOWARD CARR 
17 SOUTH RD 
LIVERPOOL PA 17532 
737-2218 
2 

FOLLOWING IS A LIST OF POSSIBLE RIDES FOR THE 
PERSON NAMED AB0UE. THE RIDES LISTED UNDER FIRST 
CHOICE ARE MOST DESIRABLE? BUT THE SECOND CHOICES 
ARE ALSO VERY BENEFICIAL 



FIRST CHOICES 



HAROLD BRISKIN 
18 ROBERTS RD 
MILLERSBURG PA 17505 
761-6160 



WAYNE L HELD 
4717 UILLOU RD 
HAILFAX PA 17535 
761-9494 
2 



SECOND CHOICES 



JAMES P SMITH 
816 B STREEN 
MILLERSTOWN PA 17777 
766-2311 
1 

WILLIAM MELLAN 
12 HERO CIRCLE 
NEWPORT PA 17689 
766-1818 
1 

EUGENE BLACK 
22 CENTER HILL DR 
ELIZABETHVILLE PA 17199 
761-7714 
3 

ALBERTA M CHASE 
44 MEADOW LANE 
ELIZABETHVILLE PA 17199 
761-1141 
3 
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SAMUEL H TONNELL 

10 BRIDGEVIEW 

NEW BLOOHIFIELD PA 17515 

733-3311 

5 

JOHN DAY 

123 CEDAR COURT 

NEU BLOOMFIELD PA 17515 

733-1977 

5 

MARTIN MACK 
75 LEE ST 

ELLIOTSBRUG PA 17512 
733-7119 
5 

CHARLES MARCH 
12 MALLARD VAY 
DUNCANNON PA 170B5 
733-0110 
6 

ROBERT LONG 
828 PARK 

DUNCANNON PA 17085 
733-4414 
6 

LEE PARKER 
146 SHIREMONT DR 
ENOLA PA 17099 
733-7369 
6 

ROD OLSON 
111 CARROL ST 
HARRISBURG PA 17019 
777-4219 
7 

ALAN ROTH 

78 BROWNING RD 

HARRISBURG PA 17108 

777-7272 

7 

BRUCE BROWN 
69 KENWOOD AE 
HARRISBURG PA 17108 
777-9891 

7 

RICHARD QUINN 
1111 MARCH RD 
LINGLESTOWN PA 17100 
777-8282 

7 



Zoo* 


Zoom that are adlacant 


1 


2,5,6 


2 


1A5.6.7 


3 


2,3,6,7.8 


4 


3,7.8 


5 


1,2,6,9,10 


6 


1,2,3,5,7,9,10,11 


7 


2,3,4,63.10.11,12 


8 


3,4,7,11,12 


9 


5,6.10,13.14 


10 


5,6,7,9,11,13,14.15 


11 


6,7.8,10,12,14.15.16 


12 


7,8,11,15,16 


13 


9,10,14 


14 


9.10,11,13,15 


15 


10,11,12,14,16 


16 


11,12,15 



Fig. 5. Relationship of zones 
used in selecting second-choice 
matches. 



only one string is transferred to 
the cassette file. 

Step 4. 

A match was printed for each 
person who participated in the 
project and a copy (similar to 
that in Fig. 4) was sent to each 
employee along with the letter 
shown in Fig. 6. 

Conclusion 

The results of this venture 
were very gratifying, in that the 
number of cars in the company's 
parking lot have decreased 
substantially while the number 
of employees working in the 
building has increased. 

The program has since been 
used by others, including one 




Newtech Computer fjurtWH, •« It .uling manul.u 
turer of musk: peripherals and software lor S-10O 
and SS-50 computers, introduces the MUSIC BOX. 

The MUSK B< )\ is ■ < omplete hardware soft- 
ware tool that enables v«>u to prodm •• music and 
sound effects on your TRS-80* 

You can compose music, play or sing along with 
the computer, or just listen to your favorite tunes — 
up to four notes at a time, with a seven octavt 
range. And you can make it sound like one, two. 
three or four different musical instruments at the 
same time. Or you can make all sorts of weird 
sound effects and noises like exploskms, gun shots. 
"phasor" and other space war sounds— not to 
mention bells and whistles 

The MUSIC BOX plugs Into the TRS-80 key- 
board or the (Expansion Interface Bus I L\ tension It 
includes a volume control, a 400 milliwatt power 
amp. and phono jack for easy connection to an 
external speaker. Software is supplied on 
Level II cassette. Requires a 32K RAM or larger 
Level II computer 

Future software developments include more pre- 
coded music, games with sound effects, music 
education, telephone tone dialing. d» Q^Q 

and Morse code programs. V^awT"-/. 

Complete «nth toftuatr ai«i man umi j<>I 
IKs W)«.h1 IKSDON.Mr A<kl*J trxtMwiniand II . .f ' ID 

trademark* of Tandy Cf«p 

NEWTECH 

COMPUTER SYSTEMS. INC. 

230 Clinton Street, Brooklyn. New York 11201 • (212) <>2f> t»220 



^Rtctor S»tvic»-3— page 102 
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4 SPEED OPTIONS FOR YOUR TRS— 80! 

The Sk : i» fhr nv»»T trmifiic clock rnodihcatiofi ivjibbtr toi the IR^ m t>p«& rtuv rv *wiichrd brtwrrn norm.il J 
reliable tiwrrasr ot 50% or a 50% reduction *eleit able .it jnv M without interruptm* execution ot cr»hing thr pru^r jn 
Insfnicnoiu vr also given tor a 100% uvrrmto I >4 MM/ (your TRS -80 may no< be rrl»*ble at this »peedj h may be 
conhgurcd by the user ro change speed with J toggle switch or on *ottware command It will automatically return to normal 
»peed anv time a dish is active requires no change to the operating system ind has prnvmom (or adding an LH1 toindaate 
when the computer is not at normal speed It mounts mstde the keyboard unit with only 4 nete^sarv connections tor the switch 
option (switch not included) and is easily removed it the computet ever needs service TheSk ?iomestullv assembled with 
socketed It" * and illustrated instructions ( ompleie satistaction i> guaranteed SK — I- .-$24*% 

PROGRAM INDEX FOR DISK BASIC 

Assemble an alphabetized indev at your entire program library trom di»k directories Program nam*-, and tree »p*ce are read 
automatical! v i need not be typed mi and may be alphabetized bv disk or progtam The list may also be searched lot any disk 
program or e» tension disks or programs added or deleted and the whole list or an\ pan <*nt to the printer finally the lot 
.twit may be stored on disk tor ruture acces* and update Reviewed in the lanuary issue or W) Microcomputing t me dnse and 
l?k required INDEX $19*5 



DUPLICATE SYSTEM TAPES WITH "CLONE" 

nftuagr program mjkr* duplicatr topic* or AN> up* written tor Lrvri II Thcv rtuv br S\SIrM tjpo 

oil at dill Inn It is not mnurv to know thr lilr 
ol*y»temco- rc*id*ncv The til* njmr rnttv point and rvrrv t-vt' 
may or m.«Jihcd Mote rOfrf i> produced CLONE $I6.»3 



jmr ot whrrt it lojd. ,n memoti 
in ASCII tormit | jrc di<pbv«d c 



jthrtr 
thr vidro v 



.turn* 



EDIT BASIC PROGRAMS WITH ELECTRIC PENCIL 

n tBowI di.k mm to Lud Hi... r r.i«r.i 
t hnr numhrr* movr 01 Jvipkjtr pra| 
nd Irtrni IX>S ipatUj moditir. rxi.ii- 



iHhct VSllldirjIilei 



• dr. H 1'm.il lonut PENPATCH $9.95 

SPOOLER FOR PARALLEL PRINTERS 

Thi* program i> | lull teatuie print formatting package featuring u»er dehneable line and page length with l.ne feed. HWt i m 
between word* or after punctuation «*reen Jump keyboard deboume and printer pause control In addition punting i 
done from a 4k expandable buffer area H that the 1 PRIST M 1 LIST command returns ifintroi to the user while printing i 
being done Ideal for Selectric or other *low printer* Allows printing and processing to run loncurrentK 
SPOOLER S l(S 93 

RAM TEST FOR LEVEL II 

Thi» machine language program test* memory chips tor open or shorted addres» or data lines a* well as intermittent* It test 
each BIT lor validity and each BYTE in the eiecutson ot an actual induction as in real program execution Bad addressrs ar 
displayed along with the bad data tnti proper data One complete test or 4MK takes iu*r 14 seconds Also includes a te>r to 
errors induced bv posver line glitches Irom external equipment RAMTEST $9.95 



INSIDE LEVEL II 

Inside level II i» a »omp*ehen*ive rrterrrwe guide to the Level II ROM* which allows the machine language progr. 

easiK utilize the >ophi«ncared routine-- they contain (. oncisetv eiplain* >et up* calling >egurnces yatiable pa*sage and I O 

routines Special consider atioet is given rodisk systems Part 11 present* an entirely new composite program structure which 

loads under the SYbTEM command and executes m both Basic and machine code with the speed and ettkientv of j lompilei 

In addition the IK chapters include a large body ot other information usetul to rhe programmer 

INSIDE LEVEL II $1595 



include "p. 
shipped on m 



MUMFORD MICRO SYSTEMS 



Box 435— E Summrrland. California 93067 (805) 969—4557 



large company who ran the pro- 
gram through several times, 
entering only those who worked 
on one shift in each run. It has 
also been used by a company 
for the registrants of a seminar 
they were holding. 



It is quite evident that car 
pooling will become more pop- 
ular -and necessary -in the 
near future, so I hope that by the 
use of this program I have con- 
tributed my share to the energy- 
saving program. ■ 



Dea' Fellow Employee 

About two weeks ago you were asked to complete ana return a Questionnaire 
wnicn was concerned with car pooling 

Attached is a computer printout ol the results ol this project as they relate to 
you. 

On the printout you will find a list of people who represent the optimum 
prospects for forming a car pool - these people are under the category ot first 
choices and all live quite close to you The second category is those people who 
are second choices These people do not live as close as those In the first category 
but do live close enough to make a carpooi worthwhile 

With this list we have provided you with the basic information needed to form 
your own car pool - the rest must be worked out by you The easiest way to form a 
pool is to start calling your fellow employees starting from the top of the list (each 
employee s telephone number is giveni and make your own meeting arrangements 



Sincerely. 

The Management 

Fig. 6. 



WEB £ ASSOCIATESi 



\mZ) TRS 80 OWNERS IGGEC 

WEVE DONE IT AGAIN! MORE QUALITY ACCESSORIES 
STARTING WITH TSHORT-V1 LVII & DOS SUPER SHORTHAND. 




TRS 80 Kevbowa win Cere's installed 



SAVE MORE 
TIME THAN 
EVER... 

Look at these new Features: 

* NOW! 41 preprogrammed LV II and DOS statement keys. 

* NOW! 11 "SAVEABLE" KUSTOM keys: Ten 10-character 
and one 64-character. 

* NOW! Includes automatic keyboard DEBOUNCE. 

* NOW! RELOCATABLE. Less than 1 K bytes of machine 
language in low or high memory. 

* NOW! Available on formatted DISKETTES for 2 or more 
drives. Comes on cassette for LV II and single disk drives. 

* Hold "SHIFT" or "CLEAR" and press desired key - entire 
statement is typed on screen. Installed "CRTL" key can 
substitute for "SHIFT." 

■ Complete decal set (see picture) included for both LV II 
and DOS systems. 

* Features self-entering commands, i.e., CONT; GOT010; 
KUSTOM. 

* Automatic Close Paren. ")" may be programmed in KUSTOM. 

TSHORT + cassette w/instruction manual $ 19.95 

TSHORT + formatted DISK version + manual $ 24.95 



TSEL™ - We'll convert your IBM SELECTRIC to a high quality 
printer - /Jp control - 512 character buffer — special TRS-80 
cable with custom control switches - complete and ready to 

LPRINT (cleaning and minor service included) $795.00 

(Options and shipping extra — call or write for special shipping 
instructions) 

TLEC™ EPROM and cable interface kit for your IBM ELEC- 
TRONIC 50 or 60 — comes with custom control switches, 
installs in minutes $289.00 

TBEEP2'" -1 - A TBEEP kit you install inside your TRS-80 key- 
board. Completely assembled and tested, it installs easily and 
in minutes to keyboard's PC board. Uses power from your TRS- 
80. No battery required. TBEEP 2 kit with complete instructions 

included $ 1 2.95 

TBUFF™- For LEVEL II CASSETTE USERS. Eliminates, once 
and for all, cassette relay sticking. Plugs in-line with the "REMote" 
cable between your TRS-80 and cassette recorder. 
(Specify cassette recorder make and model) $ 9.98 

TPAK™ - Pack of 10 C-10 blank tape cassettes with box and blank 
labels. (AGFA 611 tape, the best money can buy). ... $ 12.95 



TO BE RELEASED EARLY 1980: 

TBASE™ - A powerful DATA BASE MANAGER program second 

to none! A $400.00 value for $ 49.95 

TCHAIN™ - For LEVEL II USERS - Preserve your variables and 
arrays while CLOADmg multiple programs, EDITing, or execut- 
ing RUN $ 9-90 



1 



Send check or money order to: 

TELEPHONE ORDERS: 
(714) 559-6249 



WEB ASSOCIATES ^2/ 

P.O. BOX QE, MONROVIA , CA 91016 
(Calif, residents add 6% tax) 



DEALER INQUIRIES INVITED 
UPS/CO. D. - ADD $3.00 
FOREIGN ORDERS: 
Add 20% ($10 maximum) 
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SOFTWARE - TRS-80 - SOFTWARE 




PACKAGE ONE INCLUDES: GRAPHIC- 
TRCK "2000" — This full graphics, real 
lima game is full of fast, exciting action! 
Exploding photon torpedoes and phasars 
fill tha scraan! Vou must actually navigate 
tha antarprisa to dock with tha giant spaca 
stations as wall as to avoid kiingon 
torpadoas! Has shields, galactic memory 
raadout, damaga raports, long ranga 




ansors. ate! Has 3 (avals for beginning 
average, or expert playars! * INVASION 
WORG — Time. 3099, Place Earth's Solar 



System Mission: As ganaral of Earth's 
forcas, your job Is to stop tha Worg 
Invasion and dastroy their outposts on 
Mars, Vanus, Saturn, Neptune, ate! Earth's 
Forcas: Androids — Spaca Fighters — 
Lazer Cannon — Neutrino Blasters! Worg 
Forces: Robots — Saucers — Disintegrators 

— Proton Destroyers! Multi level game lets 
you advance to a mora complicated game 
as you get better! * STAR WARS — 
Manuever your space fighter deep into the 
nucleus of the Death Star! Drop your 
bomb, then escape via the only exit. This 
graphics game is really fun! May tha Force 
be with you! • SPACE TARGET — 
Shoot at enemy Ships with your missiles. 
If they eject in a parachute, capture them 

— or if you're cruel, destroy them! Full 
graphics, real time game! • SAUCERS — 
This fast action graphics game hat a time 
limit I Can you be the commander to win 
the distinguished cross! Requires split 
second timing to win! Watch out! 

ONLY SI 2.96 



PACKAGE TWO INCLUDES: CHECK- 
ERS 2.1 — Finally! A checkers program 
that will challenge everyone! Expert as 
wall as amateur! uses 3-ply tree search to 
find bast possible move. Picks randomly 
between equal moves to assure you of 
never having identical games. * POKER 
FACE — Tha computer uses psychology as 
well as logic to try and beat you at poker. 
Cards are displayed using TRS-80's full 
graphics. Computer raises, calls, and 
sometimes even folds! Great practice for 
your Saturday night poker match! (Plays 5 
card draw). * PSYCHIC — Tall tha 
computer a little about yourself and he'll 
predict things about you, you won't 
believe! A real mind bander! Great 
amusement for parties. • TANGLE MAN- 
IA — Try and force your opponent into an 
immobile position. But watch out, they're 
doing the same to you! This graphics game 
is for 2 people and has bean used to and 
stupid arguments. (And occasionally starts 
tnam!) * WORD SCRAMBLE — This 
game Is for two or mora people. One 
person Inputs a word to the computer 
while the others look away. The computer 
scrambles the word, then keeps track of 
wrong guesses. 



ONLY S 12.96 




PACKAGE THREE INCLUDES: POE- 
TRY — This program lets you choose the 
subject as wall as the mood of the poem 
you want. Vou give TRS-80 certain nouns 
or names, then tha mood, and It does the 
res'! It has a 1000-word * vocabulary of 
nouns, verbs, adjectives and adverbs! • 
ELECTRIC ARTIST — Manual: draw. 
erase, move as wall as. Auto: draw, erase 
and move. Uses graphics bits not bytes. 
Saves drawing on tape or disk! • GALAC- 
TIC BATTLE — The Swineus enamy have 
long range phasars but cannot travel at 
warp speed! You can, but only have short 
ranga phasars! Can you blitzkrieg the 
enemy without getting destroyed! Full 
graphics — real time! * WORD MANIA — 
Can you guess the computer's words using 
your human intuitive and logical abilities? 
You'll need to, to beat tha computer! * 
AIR COMMAND — Battle tha Kamikaze 
pilots. Requires split second timing. This is 
a FAST action arcade game. 



ONLY $12.95 




PACKAGE FOUR INCLUDES: LIFE - 

This Z-80 machine language program uses 
full grapnics! Over 100 generations par 
minute make it truly animated! Vou make 
your starting pattern, the computer does 
the rest! Program can be stopped and 
changes made! Watch it grow! * SPACE 
LANDER — This full graphics simulator 
lets you pick what planet, asteroid or 
moon you wish to land on! Has 3 skill 
levels that make It fun for everyone. * 
GREED II - Multi-levsl game is fun and 
challenging! Beat the computer at this dice 
game using your knowledge of odds and 
luck! Computer keeps (rack of his 
winnings and yours. Quick fast action. 
This game is not easy! * THE PHARAOH 
— Rule the ancient city of Alexandria 1 
Buy or sell land. Keep your people from 
revolting! Stop tha rampaging rats. Re- 
quires a true political personality to 
become good! * ROBOT HUNTER — A 
group of renegade robots have escaped and 
are spotted In an old ghost town on Mars' 
Your job as "Robot Hunter" is to destroy 
the pirate machines before they kill any 
mora settlers! Exciting! Challenging! Full 
graphics! 



ONLY $12.96 




HARDWARE- TRS-80 - HARDWARE 



PACKAGE FIVE INCLUDES: SUPER 
HORSERACE — Make your bets just like 
at the real racetrack! 8 horses race In this 
spectacular graphic display! UP to 9 
people can play! Uses real odds but has 
that element of chance you see in real life! 
Keeps track of everyone's winnings and 
losses. This Is one of the few computer 
simulations that can actually get a room of 
people cheering! * MAZE MOUSE — The 
mouse with a mind! Tha computer 
generates random mazes of whatever size 
you specify, then searches for a way out! 
The second time, he'll always go fastest 
route! A true display of artificial intelli- 
gence! Full graphics, mazes & mouses! * 
AMOEBA KILLER — You command a 
one man submarine that has been 
shrunken to the size of bacteria In this 
exciting graphic adventure! Injected into 
the president's bloodstream, your mission 
is to destroy the deadly amoeba infection 
ravaging his body! * LOOIC — This 
popular game is based on Mastermind but 
utilizes tactics that make it mora exciting 
and challenging — has 2 levels of play to 
make It fun for everyone. * SUBMARIN- 
ER — Shoot torpedoes at the enemy ships 
to get points. Fast action graphics, arcade 
type game is exciting and fun for 
everybody! 

ONLY $12.96 



MICRO 
SPEED 

Upgrade your "slow" TRS-80 to a 
SUPER FAST MACHINE!! (2.66 
MHZ) over 50% FASTER! Some of 
the features: 

Auto turn-off during cassette or 
disk access. (This means NO lost 
programs EVER!) (Turns back on 
automatically too!) MANUAL con- 
trol. (Unit may be turned on or off 
at any time. Yes even during 
program execution!) Keyboard 
indicator light "blinks" when mi- 
cro-speed is on. Stops blinking 
when off I Don't wait for SARGON 
II or any other program!!! Comes 
with easy to follow instructions. 
(Some soldering required.) OR take 
to your local computer store or 
TV-Appliance Center for quick 
installation. (5-10 minutes!!) Works 
with any model, TRS-80. 

ONLY $24.95 complete 



MICRO 
BEEP 

Simple hook up: Just plug cassette 
remote iack into unit. 



EASILY CONTROLLED FROM 
BASIC: 

OUT 255,4 - on 
OUT 255.0 » off 

MICRO-BEEP make games more 
fun as well as provide useful sound 
output for professional applica- 
tions! 

Works with Any Model I TRS-80 




PACKAGE SEVEN INCLUDES: BACK 
GAMMON S.O — 2 different skill levels 
make this game a challenge to average or 
advanced players FAST (is second avg) 
Looks for best possible move to beat you! 
FANTASTIC GRAPHICS. Plays doubles 
and uses International rules * SPEED 
READ 
speed. 

material. Great for teenagers and adults to 
improve reading skills * PT 109 ~ Drop 
depth charges on moving subs. Lower 
depths get higher points in this 'ast action 
graphics game. * VAHTZEE - Play Vaht- 
zee with the computer. This popular game 
Is even more fun and challenging against a 
TRS-80! * WALL STREET - Can you 
turn your $50 .000 into a million dollars? 
That's tha object of this great game 
Simulates an actual stock market! 

ONLY $12.95 



ONLY $9.95 complete 



PACKAGE SIX INCLUDES: 20 HOME 
FINANCIAL PROGRAMS - Figures am- 
ortization, annuities, description rates. 
Interest tables, earned interest on savings 
and much, much more. These programs 
will get used again and again. A must for 
the conscientious, inflation minded per- 
son. 



ONLY $12.95 




Master 
Charge 



24 HOUR (7 days) HOTLINE 
(602) 882 3948 

(C.O.D. $3 extra) 



Visa 



Exceptional Products through Research & Imagination 
Send Check, Money Order or Bank Card No. orders to: 



SIMUTEK 
P.O. Box 35298 
Tucson, AZ 85740 



Please Add 2.50 

Per Order For 

Postage & Handling 



Same Day Shipment on Bank Cards, 
Money Orders & C.O.D. 

All Tape Programs Require a Minimum of 16K Level 2 
Packages Available on Diskette (32K System) $4.25 Extra 

3 or More Packages Get 10% Discount 

Dealer Inquiries Invited 
TRS-80 IS A REGISTERED TRADEMARK OF TANDY CORP. 



►* Reader Service - see page 162 
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HARDWARE 



Add extra memory to your 80 without 
the expense of an expansion interface. 



Home Brew Memory 



Richard Ragucci 

507 Birch wood Ct. 

North Brunswick, NJ 08902 



After familiarizing myself 
with a Level I BASIC TRS- 
80, 1 decided to upgrade to Level 
II adding 16K of dynamic RAM. 

But, upgrading any fur- 
ther—adding more memory and 
I/O interfacing — meant spend- 
ing $250 for an expansion inter- 
face and that's without extra 
memory. 

I also owned a custom-de- 
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Fig. 1. TRS-80 Memory Map. 



signed Z-80 processor with a 
16K static RAM board and I/O 
board, so I decided to interface 
as much of my Z-80 system to 
the TRS-80 as possible. 

This article will discuss how 
simple it is to add extra memory 
to the TRS-80 without the ex- 
pense of an expansion inter- 
face. 

The memory map (Fig. 1) of 
the TRS-80 shows the first 16K 
of usable memory from 4000 to 
7FFF and a second block of un- 
used memory from 8000 to 
FFFF. The second block is 
where the extra 32K of memory 
is decoded in order for the 
TRS-80 to use it. Therefore, my 
16K static RAM board had to be 
decoded at addresses 8000 to 
BFFF. 

Hardware 

Fig. 2 shows the simple 
scheme used in decoding the 
static RAM. The 74139 is a two 
to four line decoder; putting A14 
and A15 along with RAS* into 
the A & B select inputs, will de- 
code the RAM board into four 
possible locations. 

When A14 and A15 are low, 
the board is at location 0000 to 
3FFF, but that can't be used due 
to the locations of ROM and key- 
board (see memory map). 

With A14 high and A15 low, 
the decoded board address is 
4000 to 7FFF, the memory loca- 
tion of the 16K dynamic RAM on 
the TRS-80's mother-board. 

The third location, A15 high 
and A14 low, decodes at ad- 



dress 8000 to BFFF, where the 
16K memory board should be 
located. For maximum system 
memory, another 16K board 
could be located at the fourth 
location, A14 and A15 high, 
COOO to FFFF. 

Output of the 74LS139 is "or- 
gated" with RAS" and enables 
the bus transceiver (74LS245), 
which isolates the memory 
board from the data bus when 
not needed. 

RD* enables direction control 
of the transceiver. A low on RD*. 
RAS" and the board select 
allows data to be read from 
memory. The WR* is connected 
to RAM and tells it whether to 
read or write. 

The previous portion of the 
decoding can be used for any 
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16K random access memory 
board. The 2114s in my board 
are 1K by 4 RAM, meaning two 
chips are needed for a full 1 K by 
eight words. Therefore a 16K 
board needs 32-2114 RAM and 
16 separate chip selects — one 
for each 1K of memory. 

The two 74LS138S (Fig. 2) are 
three to eight-line decoders, giv- 
ing a total 16 decoded chip 
selects. Address lines A10, A11, 
A12 decode the order of selects 
for each chip, 0-7 and A13 is 
used to decode whichever one 
of the 74LS138S is on at any 
given time. 

Other Types of Memory 

Decoding chip selects for 
other types of memory would be 
different. Another type of mem- 



(memories: 




Fig. 2. Static Memory Interface. 
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Okay, now you've had a chance to see 
what I have in mind for you with 80 
MICROCOMPUTING. Oh, I admit that 
we're just getting started and that the 
magazine will be improving a lot as we go 
along. We have some interesting ideas in 
the works for you. 

With the TRS-80 (or 90 . . . etc.) being 
the most popular microcomputer in the 
entire world, you are going to benefit 
from this in many ways. The more com- 
puters there are out there of one kind 
. . . the more good programs you are go- 
ing to have for this system. I hope that is 
obvious. You may be sure that 80 MICRO- 
COMPUTING will be packed with the 
shorter programs and reviews of the 
larger ones. You can waste an awful lot 
of money on stuff that looks great in the 
ads, but fizzles out when you try to use it. 
You need our reviews. 

The wealth of programs will also mean 
that there will be much better programs 
for the TRS-80 than any other system. Put 
yourself in the seat of a computer pro- 
grammer and you'll understand this. If 
you are going to spend several months 
developing a comprehensive program, 
and it takes all of that to write and debug 
a big program, would you write it for a 
system which has sold one hundred 
units or one which has sold over 300,000 
systems? The answer is obvious . . . and 
this is why we are already seeing pro- 
grams coming out for the "80" which are 
far better than anything for any other 
system on the market. This is tough for 



other systems ... the law of the com- 
puter jungle. 

Between our connections with Instant 
Software, the largest publisher of 
microcomputer programs in the world, 
and Kilobaud MICROCOMPUTING, you 
know that 80 MICROCOMPUTING is go- 
ing to be your most important link with 
software for the TRS-80. 

With Instant Software being sold and 
promoted in every country in the world 
where the TRS-80 is being sold, our input 
of programs is also the best in the world. 
We get programs submitted from every- 
where . . . often from 50 to 100 a week! 
You'll get the cream of the crop either 
published or reviewed in "80". 

HARDWARE TOO 

The same law of the computer jungle 
holds for hardware. Would you, as a 
manufacturer, market an accessory for a 
system which has sold 100 units or would 
you go first for the one which has sold 
hundreds of thousands. It is, as with soft- 
ware, self-evident why the great bulk of 
the hardware accessories for computers 
are for the TRS-80 these days. 

80 MICROCOMPUTING has the advan- 
tage of the use of the largest and most 
complete microcomputer lab in the world 
... the one developed for Instant Soft- 
ware and Kilobaud MICROCOMPUTING. 
This means that most new pieces of 
equipment are tested and in use by our 
staff . . . and this means that we can tell 
you what we think is outstanding . . . and 
where we find ripoffs. This lab is impor- 
tant to you. 

SUBSCRIBE 

If you are not already a subscriber 
to 80 MICROCOMPUTING, please get 
signed up right now. The yearly rates are 
$15, and that is a bargain. Just one single 
program of use to you can be worth much 
more than that. One review of an acces- 
sory could save you many times that 
much investment. I would appreciate it if 
you would appoint yourself a committee 
of one to get more subscribers for the 
magazine. You will benefit even more 
than we do here at the magazine . . . 
because the more readers we have, the 
more ads we will be able to attract . . . 
and the more ads, the more pages of ar- 



ticles you will get every month. 

The "80" market can, I think, support a 
couple of hundred pages of ads . . . and 
that would mean a magazine of nearly 
500 pages a month. That should hold 
you. You may not have time left to use 
your computer. 

ENCYCLOPEDIA 

If you've read Kilobaud MICROCOM- 
PUTING, you know that I try hard not to 
duplicate published material. My con- 
cept is that every reader should save 
every issue (we sell inexpensive boxes 
for this so they can sit on your library 
shelf) and treat the magazine as a con- 
tinuing encyclopedia of computing. I 
make sure that much of the material in 
each issue is written in simple language 
so it will be understandable by even the 
rawest newcomer to computers. Oh, I 
have articles for the more advanced 
users too, so you'll have something to 
look back over later and use as your 
understanding of your system grows. 

Try to think of 80 MICROCOMPUTING 
as more of a large club newsletter than 
an ivory tower high-level publication. I'll 
leave the pomp to other publishers . . . 
the ones with the well-deserved inferiori- 
ty complexes who cater to their inade- 
quacies by publishing esoteric baloney. 
This magazine is written by the readers 
and edited by people whose aim is to 
help you enjoy your TRS-80. 

SAVE 

With each issue costing $2 at your 
computer store, that's $24 a year. For $15 
a year you can subscribe ... at least for 
now. As the magazine expands, please 
do not be surprised if the cover price in- 
creases, along with the subscription 
price. I started 73 Magazine for radio 
amateurs twenty years ago with a cover 
price of 37« (two for 73e) and it is up to 
$2.50 a copy now (and it is the largest of 
the ham magazines). 

For you bargain hunters . . . and those 
who find that one year goes by all too 
rapidly, the three year rate for "80" is $36. 
This, too, will be going up . . . reflecting 
the inflation, paper increases, postage 
increases, and a short vacation for me in 
Hong Kong next year. Someone has to 
pay for that. 



// coupon 
below has 
been used, 
please 
fill out 
subscription 
form on the 
Reader 
Service card 
in the back 
of the 
magazine. 



Yes! 



Card* 



Sign me on as a subscriber to 80 Microcomputing 1 
for only $15 a year! j 



Signature 
Name 



Address. 
City 



State 



Zip 



D 12 issues-$i5 
D 36 issues -$36 

□ Please bill me 

□ Payment Enclosed 

□ Master Charge 

□ VISA 

D American Express 



I*? 



microcomputing 



Subscription begins with next published issue 

Back issues, while available, are S3 each 

Canada: $15 per year US funds 

All other foreign subscriptions $20. one year only. US currency only 

PO Box 981 • Farmingdale NY 1 1737 
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ory easily interfaced to the 
TRS-80 for very little money, are 
16K dynamic RAMs, such as 
4116s. 

Board decoding would be 
nearly the same as previously 
discussed, however, there 
would be two 74LS245s, with the 
48K line from the 74LS139 "or- 
gated" into the other 74LS245 to 
control the 48K block of 
memory. Refresh and multi- 
plexing for the address bus 
must be included, but other- 
wise, the rest of the board select 
circuitry is the same. 

The 74LS157s are quad two to 
one-line selectors and are used 
to multiplex the higher order ad- 
dresses with the lower order ad- 
dresses. The sequence of 
events occurs as follows; the 
MUX signal from the TRS-80 
goes low, allowing AO to A6 ad- 
dress lines to go to the RAM, 
with RAS* also low to allow the 
RAM to accept these address 
lines. When MUX goes high, A7 
to A13 will be presented to the 
RAM and CAS* will go low to let 
the RAM accept the higher order 



addresses. The WR* signal 
again tells RAM whether to read 
or write, as was the case with 
the static RAM. 



If you have 16K of static RAM 
around, interfacing is relatively 
simple and very cheap. If not, 
adding up to 32K of dynamic 



RAM (16K chips) can be done for 
less than $200 including mem- 
ory with the method described 
above. ■ 
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Fig. 3. Inexpensive method to add dynamic RAM. 



MAYDAY 



The Complete Unlnterruptable Power Supply 




The lights blinked ■ 

even the slightest power failure 



•at y to oi • - 

|utt plug your computer into 

MAYDAY." 



con ruin a data disk and 
cause loss of the program. 




We honor: 



H 






Protect your time and 
Investment - 

for moro information contact ... 

SPu<n • ^Technology, &nc. 

Naw Durhom, Now Hampshire 03855 
(603) 859-7110 



v-151 



(Manufacturing high technology products sine* 1970) 
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Apparat, Inc., announces the most 
powerful Disk Operating System for the 
TRS-80®. It has been designed for the 
sophisticated user and professional 
programmer who demands the ultimate 
in disk operating systems. 

NEWDOS/80 is not meant to replace 
the present version of NEWDOS 2.1 
which satisfies most users, but is a 
carefully planned upward enhance- 
ment, which significantly extends 
NEWDOS 2.1's capabilities. This new 
member to the Apparat NEWDOS' 
family is upward compatible with 
present NEWDOS 2.1 and is supplied 
on Diskette, complete with enhanced 
NEWDOS + utility programs and 
documentation. Some of the 
NEWDOS/80 features are: 

• New BASIC commands that 
supports files with variable record 
lengths up to 4095 Bytes long. 

• Mix or match disk drives. Supports 
any track count from 18 to 80. Use 



35. 40 or 77 track 5" mini disks drives 
or 8" disk drives, orany combination. 

• A security boot-up for BASIC or 
machine code application programs. 
User never sees "DOS READY" or 
">READY" and is unable to 
"BREAK", clear screen, or issue 
any direct BASIC statement 
including "LIST". 

• New editing commands that allow 
program lines to be deleted from one 
location and moved to another or to 
allow the duplication of a program 
line with the deletion of the original. 

• Enhanced and improved 
RENUMBER that allows relocation 
of subroutines. 

• Powerful chaining commands. 

• Device handling for routing to 
display and printer simultaneously. 

• CDE function; simultaneous striking 
of the C, D and E keys will allow 
the user to enter a mini-DOS 

to perform some DOS commands 



without disturbing the resident 
program. 

• Upward compatible with NEWDOS 
2.1andTRSDOS2.3. 

• Includes Superzap 3.0 and all 
Apparat 2.1 utilities. 

NEWDOS/80 with all of the 
NEWDOS ♦ utility programs, many of 
which have been enhanced, is priced at 
just $149.00 and is available at most 
TRS-80 dealers. Previous NEWDOS 
owners may receive full trade in 
allowance toward the purchase of 
NEWDOS/80 by including with their 
order the serial number of their 
NEWDOS 2.1 diskette, the price paid 
and where purchased. In most cases 
that purchase price will be subtracted 
from the price of NEWDOS/80. As with 
NEWDOS 2.1. NEWDOS/80 relies on 
the TRSDOS and Disk Basic Reference 
Manual published by Radio Shack. 
NEWDOS/80 documentation supports 
its enhancements and upgrades only. 





pparat, Inc. 



.•'264 



EA 



/VHCROCOMPOTER 

TECHNOLOGY 
INCORPORATE) 



TO UPGRADE TO NEWDOS/80, COMPLETE AND MAIL TO: 

Apparat, Inc. / Microcomputer Technology, Inc. 

7310 E. Princeton Ave. OR 3304 W. Mac Arthur Blvd. 

Denver, CO 80237 / Santa Ana. CA 92704 

303/758-7275 303/741-1773 / 714/979-8923 

PREVIOUS NEWDOS OWNERS ONLY 

Serial # 

Price 

D Check 



Purchased 



D Money Order 



D Master Charge □ Visa 
Expiration Date 



Card No 

Colo residents add 6 5% sales tax Cal. residents add 6Si sales tax 
Add $10.00 postage and handling 

Please rush NEWDOS/80 to: 

Name 

Address 

City 

Phone 



State . 



Zip 



Upgrade o«er expires July 31. 1980 n 

I i 
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HARDWARE 



A way of preventing your delicate cassette relay 
from welding itself shut. 



Dcstick Your Relay 



Herman Lukotf 
506 Dreshertown Rd. 
Fort Washington PA 19034 



I had heard about a relay stick- 
ing problem in the TRS-80 re- 
corder but it really didn't worry 
me, until on*> day when my tape 
ran beyond 'he end of data and 
there was nothing I could do to 
stop it short of turning power 
off. 

A tiny reed relay (K1) on the 
computer board provided the 
contacts for turning the motor 
on in the recorder. Using a milli- 
ammeter, I measured the run- 
ning current at 130 milliam- 
peres. The starting current, how- 
ever, was different with peaks of 



CONTROL 
LINE FROM @ 
COMPUTER 



IOOK 



CI 



Vz ampere noted. This high 
starting current was undoubted- 
ly welding the relay contacts to- 
gether. 

Solution 

There are two solutions to the 
problem. One is to replace the 
tiny reed relay with a more sub- 
stantial one capable of handling 
the high starting current. A look 
at the computer board con- 
vinced me that it is impossible 
to put a larger relay in the same 
position. 

You could install a larger 
relay elsewhere on the board 
and run wire leads, but this 
presents a problem to many 
people. For one, it voids the war- 
ranty and secondly, there is 
always the chance of damaging 
another component. 

The second solution is the 
transistorized current amplifier 
shown in Fig. 1 which requires 
no modification to the TRS-80. 
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Figure 1 



The output transistor handles 
the high starting current of the 
motor while the reed relay con- 
tacts see a miniscule current of 
80 microamperes: at that level 
the reed relay contacts should 
last forever. 

The motor operates at 6 volts; 
the voltage drop across the out- 
put transistor has to be very 
small by comparison. But how 
small? 

In one test in which the 
voltage was dropped .4 volt, 
there was no detectable change 
in tape speed. The measure- 
ment was made by reading the 
cassette counter after five 
minutes of running the tape. 

The motor probably has some 
form of speed control to desen- 
sitize it to voltage changes. 
Nevertheless, keep the voltage 
drop to less than .2 volt. 

The secret to obtaining a low 
voltage drop across the tran- 
sistor is to select a high current, 
moderate/high gain transistor 
and operate it at a fraction of its 



rated current. In this mode the 
current gain will be very high 
and the transistor will operate 
deep into saturation, producing 
a low voltage drop. A PNP tran- 
sistor is required in this applica- 
tion. 

My junk box held a 2N1544 
germanium power transistor 
which developed only a .05 volt 
drop. This transistor is sold in 
the surplus market. A silicon 
PNP power transistor type 
2N5745 produced a respectable 
.1 volt drop. Other transistors 
with similar parameters will 
probably work as well. 

Minimal Hardware 

Even though a large tran- 
sistor is used as the motor 
driver, the actual power dissi- 
pated in it is very low, less than 
25 milliwatts, therefore, no heat 
sink is required. Also, notice 
that no protective diode is need- 
ed at the collector of the tran- 
sistor. Even though the motor is 
an inductive load, other circuits, 
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including a large electrolytic 
capacitor, limit any inductive 
voltage peaks. 

The input 2N3906 transistor 
functions as an emitter-follower 
current amplifier and is avail- 
able from many sources. A 
negative voltage source is re- 
quired to provide base current 
for the two transistors. 

Two options are shown. In 
Fig. 1, a small 9 volt battery 
similar to those found in tran- 
sistor radios is used. The cur- 
rent drawn is approximately 10 
milliamperes and long battery 
life is guaranteed, for current is 
required only when the tape 
runs. 

If you wish to avoid the bat- 
tery, an alternate approach is 
shown in Fig. 2. The A.C. power 
cable, formerly plugged into the 
back of the computer, is now 
passed through the motor con- 
trol unit by way of two DIN con- 
nectors. A few components pro- 
vide full wave rectification and 
-12 volts output that can be 
substituted directly for the 9 volt 
battery. The drain on the TRS-80 



power transformer is negligible. 

A must feature that is easy to 
include is a small toggle switch 
to change from computer con- 
trol to manual. In the manual 
position, the tape can be re- 
wound, moved forward, etc., 
without having to pull the con- 
trol cable out of the cassette 
unit. 

The few components can be 
mounted on perf board and easi- 
ly placed in a 4" x 2" xVA" 
box. My box was made of alumi- 
num and I decided the safest ap- 
proach was to electrically 
isolate the case from any of the 
circuitry. Therefore, the input 
jack, output lead and other wir- 
ing should not touch the case. 

The appropriate jack, plug 
and box can be obtained from 
Radio Shack. 

Incidentally, the one time the 
relay contacts stuck, they re- 
mained stuck and the only way I 
could get the relay to work was 
to give it a sharp rap with my 
knuckle. Hopefully, this is the 
last I will hear of the relay stick- 
ing problem. ■ 




The world's most popular microcomputer, with 16K of 
memory and Level 1 1 basic for only $720, complete 
with full 90 day Radio Shack warranty. 
We accept check, money order or phone orders with 
Visa or Master Charge (Shipping costs added to 
charge orders). 

Disk drives, printers, peripherals, software & games. . . 
you name it, we've got it 
(both Radio Shack A other 
brands). Write or call for 
our complete price list 
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ELECTRONICS 
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32 EAST MAIN • MILAN, MICHIGAN 48160 • (313) 439-1508 



KGS-80 
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A TRS-80 WORD PROCESSING 
SYSTEM FOR LESS THAN $600 

(If you own IBM Selectric of equivalent ) 

Turn your typewriter and TRS-80 into 
a new word processing system with a 
new device, the "KGS-80". 

e Plug in compatible with TRS-80 

e No mechanical modification to the type- 
writer 

eCan be installed in 5 seconds 

e Software, a versatile Simple Letterwriter. in- 
cluded 



179 Riveredge Rd. Tenafly NJ 07670 (201) 569-8769 "i« 

DEALER INQUIRIES INVITED 



INTERNATIONAL ENTERPRISES INC 

STATEMENT Of PROFIT/LOSS 
FOR PERIOD ENDING JANUARY 1978 



CONTUAC' l»*>* 
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INTERNATIONAL ENTERPRISES INC 
BALANCE SHEET 
JANUARY 197IJ 
ASSETS 
CASH ON HAND 740.1 1CR 

CASH IN BANK 2190 S3 

INVENTORY OF PARTS 1119 00 

EOUIPMENT 4114 50 

ACCRUED DEPRECIATION 00 

BUSINESS VEHICLES 00 

BUSINESS AIRCRAFT 70O00 00 

ACCRUED DEPRECIATION 6*2 07CR 

METER OEPOSlTS 00 

TOTAL ASSETS 



^132 

W* have a complete 
selection ol disk and 
cassette baaed businasa 
aoftwara lo« your PET 
and TRS-80 computara. 
Call or write tor irae 

201 Worley Rd. 

Dexter, Mo 63841 

(314)624-7611 



Dealer inquiries invited 
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tft processing TWICE as fast! with 




for your 

TRS-80! 

We benchmarked a production 
run of 600 mailing labels and 
found that the printing ran nearly 
twice as fast with THE 
SPOOLER installed. 

THK SPOOLER requires no modification to your 
user application program. 



Prtre: SIM. Add S4. for credit card order*. 

Add $5. for C.O.D. order? 
■jteiMMMtaiioM available separate! > for SI0. 
Model 11 version now available. 



Phone (513) 891-4496 or write: 

Snapp Inc. „», 
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UTILITY 



Not mathematical— this program 

'roots out' your defective memory locations. 



Babyroot 



Dennis Bathory Kitsz 
Roxbury, VT 05669 



Babyroot is a program that 
exercises the TRS-80 RAMs. 
I developed this program be- 
cause, during a particularly 
warm and humid day, my pro- 
grams started to crash for no ap- 
parent reason. I scratched out 
an inelegant but workable first 
version and located a wayward 
address, 4A02. 

The program exercises all 
combinations of bits in three 
neighboring bytes simultan- 
eously. Locations are repeated- 
ly written to and read from to as- 
sure that they are functioning 

The Program 

Prepare Babyroot as a BASIC 
program or use T-BUG to enter 
the machine code and create a 
SYSTEM tape. 

Load Babyroot using the SYS- 
TEM command; enter the name 
RAMCHK and when the pro- 
gram has finished loading 
(about 8 seconds), enter /20480. 
The program, now located at 
5000 hex, works over the RAM 
from address 6000 to 7FFF hex. 
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At the end of this sequence, it 
transfers itself to 7000 hex, exer- 
cising RAM from 4000 to 6FFF 
hex. Each complete cycle takes 
12 1/2 minutes on an unmodified 
TRS-80. 

At the beginning of the pro- 
gram, the screen clears and a 
star appears in the bottom right- 
hand corner. About five minutes 
later, the program transfers to 
high memory. The star vanishes 
and a graphics block appears in 
the next screen position. Ad- 
dress 3FFF is presented at the 
top of the screen, indicating that 
address 3FFF is "bad". The pro- 
gram reads that address as bad 
because the video memory bank 
is deliberately designed short 
one bit. 

The video memory ends at ad- 
dress 3FFF and system RAM be- 
gins at 4000. This memory loca- 
tion is inadvertently exercised 
by the program when it begins 
working over address 4000 and 
its two neighbors. It serves as a 
check that Babyroot itself is 
operating correctly. (If your 



TRS-80 has a lowercase hard- 
ware modification that saves 
the extra bit, this memory loca- 
tion should read correctly. No 
bad bit will be presented.) 

Errors in address 4000 to 41 E5 
are usually terminal. 41E6 to 
42E8 might or might not cause 
significant grief. 42E9 and up is 
where the BASIC programs sit. 

If the bad bit coincides with a 
fixed program bit. everything 
will look fine. If it is different 
from a fixed program bit, that 
program might never LIST or 
RUN correctly. If the bad bit co- 
incides with a variable location, 
it will be invisible at first. 

But watch those results! 

Reading down from address 
7FFF, you find control informa- 
tion, strings and the BASIC 
stack. Errors here can wipe out 
the program. So, there is a 
chance that in normal operation 
a bad bit might go unnoticed for 
months. 

Keep this program running (it 
will continuously loop) for no 
less than 8 hours, if you suspect 



a bad bit. It took 9 1/2 hours be- 
fore conditions were right and 
the balky bit turned up in my sys- 
tem. 

The computer can be restored 
for normal use only by turning it 
off. All system RAM has been 
upset by Babyrooting around. If 
the RAM is too badly damaged, 
Babyroot itself may not load. 
Write me for a special version of 
the program for use in this case. 

A Bit Error 

When you've discovered a 
bad RAM, what do you do? A bit 
error is a sophisticated enough 
problem that you first might 
want to leave it to your friendly 
Radio Shack repair center. How- 
ever, if you find this suggestion 
unappealing, you'll want to 
tackle it yourself. 

First, you'll probably want to 
find the bad bit's position in the 
byte. Now that you know its ad- 
dress. Table 1 lists a short pro- 
gram to identify that bit. 

Enter the least significant 
byte of the bad RAM address in- 
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Table 1. Bit Search program. 



to the position marked ##. Enter 
the most significant byte into 
the position marked §§. (You 
may relocate this program any- 
where in memory, if necessary, 
to avoid baiky addresses.) Now 
set this program in motion. A 
good byte will be displayed 
thus: 



As bad bits are found, the 
stars will be replaced by letter X, 
so: 

***X*X** 

Bit 7 is left-most in this dis- 
play and bit is to the right. It 
will continuously loop, exercis- 
ing this one address, just as the 
Babyroot program exercised the 
whole of the memory. After a 
given period of time, all the bad 
bits should be indicated by an X. 

Next you'll need to buy re- 
placement 4116 RAMs ($8 to 
$15), one for each bad bit posi- 
tion. Dynamic RAMs are curious 
devices. If you don't know how 
to handle these sensitive MOS 
devices, find out! Look in Popu- 



lar Electronics, on data sheets, 
in books, ask a friend or what- 
ever, but don't proceed until you 
know how to handle them! (And 
put your cats in the bathroom.) 
For greatest safety, use a static- 
free workbench. 

Get a TRS-80 technical man- 
ual or RAM expansion instruc- 
tion sheet. Open the case, find 
the RAM(s) corresponding to the 
bad bit(s). Pull the RAM(s). Re- 
place each with a new 41 16 and 
run Babyroot again. If the error 
is gone (and it should be), you're 
set. If not, double check your 
work, making sure you've re- 
placed the correct RAM. Switch 
RAMs. See if the bad bit changes 
position. Go down the line. You 
may even have a bad new RAM. 

If you're desperate, call me; I 
know the feeling of sitting 
awake at 3 a.m., wondering 
whether or not I should turn my 
TRS-80 into a flower pot. I'll try 
to help you with your diagnosis. 
I hope the program runs for days 
without turning up a bad bit. 
Good luck.B 
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5000 * 21 00 3C 11 01 X 01 FF 03 36 20 ED BO DO 21 80 

5010 * 50 3A FE 3F EE OA 32 FE 3F DO F9 06 7F 33 10 FD 

5020 • 21 00 60 AF 77 4F F5 79 77 23 7C FE 80 28 30 E5 

5030 * DD E5 El BC 28 29 El Fl 77 2B 28 77 47 7E B8 28 

5040 * 05 16 IB D5 18 IB 23 23 7E B8 28 05 16 10 D5 18 

5050 • 10 28 34 0C 7E 47 FE 00 20 CC 23 0E 00 18 C7 18 

5060 • 64 7C E6 F0 OF OF OF OF 16 22 18 22 7C E6 OF 16 

5070 • IB 18 IB 7D E6 F0 OF OF OF OF 16 10 18 10 70 E6 

5080 * OF 16 09 18 09 Dl 3E 03 92 0D 77 00 18 FF D5 F5 

5090 • 11 00 X 1A FE 20 28 03 13 18 F8 7B FE 04 20 0A 

50A0 * 3E 20 IB 12 IB 12 IB 12 IB 12 Fl FE 0A 30 04 C6 

50B0 « 30 18 02 C6 37 12 C5 06 FF 10 FE CI 01 3E C9 92 

S0C0 * 00 77 44 18 FF DO E5 DO E5 El 01 7A EE 20 57 05 

5000 * 06 80 2B IB 10 FC 01 FF 00 ED B0 DD El 3E 20 DO 

50E0 • AE A2 DO 77 A2 3E F0 DD AE AC DO 77 AC DO E5 El 

5OF0 * 2E 11 E9 44 45 4£ 4E 49 53 20 48 49 54 53 5A 00 



FOR X - 20480 TO 20735 : READ A : POKE X.A : NEXT X 

POKE 16526,0 : POKE 16527,80 : PRINT USR(0) 

DATA 33,0,60,17,1,60,1,255,3,54,32.237,176,221,33,128 

DATA 80,58,254,63,238,10,50.254,63,221,249,6,127,51,16,253 

DATA 33,0,96,175,119,79,245,121,119,35.124,254,128,40,48.229 

DATA 221,229,225,188.40.41,225,241,119,43,43,119.71,126,184,40 

DATA 5,22,27,213,24,27,35.35.126.184.40.5,22,16.213,24 

DATA 16,43,52,12,126,71,254,0,32,204,35,14,0,24,199,24 

DATA 100,124,230,240,15,15,15,15,22,34,24,34,124,230,15,22 

DATA 27,24,27,125,230,240,15,15,15,15.22.16.24,16,124.230 

DATA 15,22,9,24,9,209,62,211,146,221,119,13,24,255,213,245 

DATA 17.0.60.26.254,32,40,3,19,24,248,123,254,4,32,10 

DATA 62,32,27,18,27,18,27,18,27.18,241.254,10,48,4,198 

DATA 48,24,2,198,55,18,197,6,255.16.254,193,209,62,201,146 

DATA 221,119.68,24.255,221,229.221.229,225.209.122.238.32.87.213 

DATA 6.128.43.27,16,252.1.255.0,237.176.221,225,62,32,221 

DATA 174, 162. 221. 119, 162, 62, 240, 221, 174, 172, 221, 119, 172, 221, 229. 225 

DATA 46,17,233.68.69.78,78.73.83,32.75.73,84,83.90.0 



Total progran cycle: 12 minutes 24 seconds 
Recommended number of cycles: 40 or nore 

Babyroot versions: Machine (top) and BASIC (bottom). 



DR. HOWE'S SOFTWARE 

For the TRS-80 (•) 

" Ac $mcfi uACi 

MONITOR #3 $39.95 

Disassemble', memory display*, memory move, 
search verify, and modify; read and write object 
tapes, hexadecimal arithmetic; obiect code reloca- 
tor; unload programs for disk; symbolic output 
tapes. 41-page instruction manual. 

MONITOR #4 S49.9S 

Same as Monitor #3 but adds: save and read disk 
files, direct input and output of disk sectors; send, 
receive, or talk to another computer via RS-232-C in- 
terface; symbolic disassembly on disk 

SMART TERMINAL S49.95 

Enables your T RS-80 to be used as a remote terminal 
to a time-sharing system. Supports lowercase and 
full range of control keys. Automatic transmission 
between memory and host computer Much more. 

PACK/UNPACK J24.95 

increase disk file capacity by 33% with NO NEW 
HARDWARE. Applies only to string data in random 
files. Ideal for mailing lists, etc 

GAME OF "LIFE" $5.95 

John Conway's game of "life" shows patterns evolv- 
ing and changing swiftly before your eyes. A dazzl- 
ing demonstration program! 

■ASK SOFTWARE 

MAILING LIST $69.95 

Maintains mailing list files of over 1000 names per 
diskette. Add, delete, change, find name, machine 
language sort, print file. 

SMALL BUSINESS ACCOUNTING $49.95 

Based on Dome Bookkeeping Journal #612, keeps 
track of income, expenditures, and payroll for a 
small business of up to 16 employees. Daily, month- 
ly, year-to-date Summaries. 

HOME BUDGET $49.95 

Checkbook maintenance combined with records of 
income and monthly bills. Monthly and year-to-date 
summaries showing tax deductions. 

DATABASE MANAGEMENT $29.96 

Define files of any description and maintain on cas- 
sette or disk. Add, change, delete, find, sort, justify, 
print, line print, total fields, write 



HOWE SOFTWARE ^103 

14 Lexington Road 

New City, New York 10956 

n TRS-BO is a registered trademark of Tandy corp. 




Expand memory in TRS-60* ■< and ■*, 
ExUy. Apple, new PET, Heath H89. and 
other machines with our low power, high 
speed (250 ns/4 MHz) 16K dynamic 
RAMs. Add $3 for two dip shunts plus in- 
structions for TRS-80' expansion. 

•TRS-80 li ■ trademark of the Tandy Corporation 

liiiiiiiiiiiiiiiiiiiiiiiiiiil 



Thinking about easier expansion? Higher 
speed} More power? Then think S-100. We 
stock an innovative and extensive line of 
S-100 bus products, from computer enclo- 
sures to color graphics boards. Send today 
for our free catalogue (foreign requests: 
add S1 to help cover postage and han- 
dling costs). 




TERMS: Cal res add tax. Allow 5% for 
shipping, excess refunded. VISA*/ 
Mastercharge* call our 24 hour order 
desk at (41 5) 562-0636. COD OK with 
street address for UPS. Prices subject to 
change without notice. 
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rectlvabU TWICE as fast! with 

^ for your 

TRS-801 

We have benchmarked processing 
of customer statements and aging 
reports and found that these 
reports run nearly twice as fast 
with THE SPOOLER installed. 

THE SPOOLER requires no modification 10 your 
user application program. 



Price: SIM. Add S4. for credit card orders. 

Add SS. for C.O.D. orders 
Documentation ataJlabte separately lor SIO. 
Model II version now available. 



PtKMK (513) 891-44% or write: 



k-232 



Snapp Inc. 

I 
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GENERAL 



Develop a local business program — 
but read this before you press ENTER! 



Business Programming 



Wes Clarke 
Westech Corp. 
P.O. Box 432 
Sparta. N J 07871 



The arrival of the inexpensive 
microcomputer in the 
marketplace has opened an en- 
tirely new area of opportunity 
for the businessman who can 
program. With small business 
just crying out for some way to 
ease the burden of paperwork, a 
real need has developed for 
good business software. 

This software, however, has 
been slow to emerge and many 
entrepreneurs have been disillu- 
sioned by what business sys- 
tems have available. As a small 
businessman, who has devel- 
oped a successful inventory 
control program for theTRS-80, 1 
have insights into the needs of 
small business and the prob- 
lems encountered writing and 
marketing good business soft- 
ware. 

Maintaining Inventory 

The story starts around mid 
1967 where, as part owner of a 
Radio Shack dealership in Spar- 
ta, New Jersey, I had a problem: 
Maintaining my inventory. I had 
worked in the auto parts busi- 
ness and was using a card sys- 
tem popular in that industry, but 
the maintenance time was ex- 
cessive. 

The logical answer was a 
computer, but the prices for 



business systems were way ov- 
er what I could afford. A hobby 
computer seemed like a way to 
solve my problem, but I knew lit- 
tle about them. I set out to learn. 
I was just starting my studies 
when Radio Shack announced 
the TRS-80 — the perfect answer, 
a system that I could not only 
use, but sell. 

I ordered one immediately 
and began studying in earnest. I 
devoured everything I could find 



discover that 16K would not suf- 
fice for the complex program 
that I had in mind. I had to ex- 
pand to Level II and disk drives 
for a useful program. 

I did not stop working, how- 
ever, and developed a pilot pro- 
gram on the Level I to test the 
practicality of my ideas. I com- 
pleted the program around April, 
1978, and, as it turned out, it 
opened the door for me. 

I took it to a dealer training 



... to ease the burden of paperwork, 

a real need has developed 

for good business software. 



on BASIC, the Z-80 and comput- 
ers in general. I even studied 
assembly language. I also start- 
ed looking closely at my prob- 
lems in the store and planning 
what I wanted the computer to 
do and how I wanted it done. 

This proved invaluable later 
on, for it is the consideration of 
the many minor details of store 
operation that has made my pro- 
gram a success both for me and 
for others. 

My 16K Level I arrived three 
days after Christmas 1977, and I 
dragged it along on a ski vaca- 
tion, much to the chagrin of my 
wife. The well-written Level I 
manual enabled me to quickly 
convert the general information 
that I had learned to the spe- 
cifics of the TRS-80 and I started 
work on my problem. 

It did not take long for me to 



meeting and demonstrated it to 
the Radio Shack Regional man- 
ager. He realized that it met the 
particular needs of the Deal- 
er/Franchise network and con- 
tacted the VP of the Franchise 
Division who asked if I could 
have a demonstration version 
ready for the summer meetings. 
I agreed to try and, upon receipt 
of my 32K Level II disk system, 
was able to complete the pro- 
gram in time for a series of 
meetings in August, 1978. 

The program was well re- 
ceived. Several dealers offered 
valuable suggestions at that 
time which I incorporated in the 
program. I placed the program in 
operation in my store on Sep- 
tember first for testing. It took 
about two months to get the 
bugs worked out and the docu- 
mentation prepared. I started 



shipping to my first customers 
in November. 

Documentation 

So tar, everything had gone 
smoothly, then problems began. 
It seemed that my documenta- 
tion left something to be de- 
sired. I had written it in the form 
of other documentation that I 
had seen, complete with flow 
charts and detailed program de- 
scriptions. 

Other users who were pro- 
grammers were having no prob- 
lem with it, but most of my 
customers were businessmen. 
They did not have time to read 
all about random files, backups, 
memory sizes, etc. They just 
wanted to use the program. It 
also turned out that my part en- 
try routine was too slow and 
was causing some frustration. 

I started work on revisions. I 
rewrote the manual as a pro- 
grammed learning guide — one 
that would take a novice 
through the program step by 
step and teach him to use it. I 
rewrote the routines that were 
causing troubles. I developed an 
automatic loading routine that 
eliminated the need to set mem- 
ory size and brought the user up 
to a master menu when the sys- 
tem was turned on. 

I also sent out a lot of letters 
to correct various bugs that 
were found by an ever increas- 
ing number of users and tried to 
include in my planned modifica- 
tions their suggestions for some 
new routines that made the pro- 
gram easier to use. 
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In April, 1979, I informed my 
customers that a modification 
to the program was available at 
a nominal cost to cover shipping 
and the disk. The modification 
was very well received. The pro- 
gram had finally reached the 
professional level that I had 
hoped for. 

Probably the most significant 
reason for the program's suc- 
cess is that I spent a great deal 
of time planning the type of in- 
formation that needed to be 
stored and the manner in which 
it would be updated. The pri- 
mary objective of the program 
was to improve the profitability 
of my business. All of my plan- 
ning was directed toward this 
goal. 

I made sure that each piece of 
information that was retained 
had a valid use in improving my 
business efficiency. I used 
machine language packing rou- 
tines where necessary to store 
more information than could be 
handled with BASIC. To give you 
an idea of the packing density, 
the following information is 
stored on each part: part num- 
ber (8 alphanumeric characters), 
description (15 alphanumeric 
chrs.), list price, sale price, 
regular cost, promotional cost, 
quantity on hand, quantity on 
order (two orders), items per 
box, reorder point, accumulated 
sales year to date and previous 
year, vendor code and three 
dates pertaining to items on 
sale. Even with all this informa- 
tion stored, I am able to get 
almost 5000 part numbers on a 
Model 1 TRS-80 system. 

Good Programming 

Storing information compact- 
ly is only part of the secret of 
good programming. Equally im- 
portant is the manner in which it 
is updated. The program has to 
be easy to use by relatively un- 
trained individuals and it has to 
save time. In most cases the 
owner or manager of a small 
business doubles as the data 
processing department and the 
entire justification for purchas- 
ing the computer is to free up 
more of his valuable time. 

For this reason I chose point 
of sale as my primary means of 
updating inventory levels, with 
batch entry available when nec- 



essary. With a point of sale 
system, all of the following can 
be accomplished with a single 
entry, taking essentially the 
same time as writing a sales slip 
or invoice. 

1. The inventory level is up- 
dated immediately. Therefore, 
stock levels are always current. 

2. The descriptions and price 
match the product in hand, re- 
ducing the number of incorrect 
entries. 

3. The computer calculates 
the extended cost, subtotal, 
sales tax and change, reducing 
mathematical errors. 

4. The computer stores infor- 
mation on income, cost of sales 
and percent profit by category 
and reports the figures on a day, 
month and year basis eliminat- 
ing the need for a cash register. 



enough to keep up with a good 
typist. I used the normal input 
statement in my original pro- 
gram to avoid this problem. 

Repetitive entries of the same 
information. I reviewed an ac- 
counts receivable program re- 
cently in which it was necessary 
to enter the date of the transac- 
tion for each entry. I suggested 
that the day's date be automat- 
ically entered with an option to 
change it. Multiple entries be- 
come highly frustrating with this 
method. 

Methods of Updating 

My initial program had a 
general change portion that up- 
dated the "part" information. I 
now have four separate meth- 
ods to update: One for price 
changes; one tor stock adjust- 



Documcntatioii is probably (he 

weakest area of small business 

programs that I have seen. 



Additionally, the information is 
much more detailed. 

Frequently I'm asked if point 
of sale is practical on a micro- 
computer and my answer is defi- 
nitely, yes. By using a special 
machine-language search rou- 
tine, I can access any part in the 
file in four to six seconds. Also, 
the computer can generate an 
invoice as rapidly as by hand. 

This brings up another impor- 
tant point. Programs should be 
written in the normal high-level 
language of the computer, in 
this case BASIC, but employ 
machine-language subroutines 
wherever time or density is im- 
portant. This allows you to 
modify most of the program, but 
gives you the flexibility of 
machine language. 

When programming, don't ne- 
glect the human factor. An 
otherwise good program may be 
rejected because of operator 
frustration. Let me give some ex- 
amples: 

INKEY Routines written in 
BASIC. These routines which 
allow flashy screen formatting 
are great for demonstration, but 
I have yet to find one that is fast 



ment, one for sale items and the 
original general change. 

Test your program in the real 
world and be prepared to modify 
it to make it easy for an operater 
to use. No one finds bugs faster 
than an inexperienced operator 
in an actual situation. 

The likelihood of an inexperi- 
enced operator brings us to the 
next area of importance — docu- 
mentation. Documentation is 
probably the weakest area of 
small business programs that I 
have seen. Generally, program- 
mers want to write programs, 
not documentation. They tend 
to spend little time on it and 
direct it toward other program- 
mers, not the novice. The follow- 
ing information is a must in any 
business program documenta- 
tion: 

1. An index. 

2. A glossary of special terms 
including limits of fields used. 

3. A description of the various 
program modules and how they 
interact with the stored informa- 
tion. 

4. A step by step practice sec- 
tion that leads the user by the 
hand through all of the major 



portions of the program. 

5. Instructions on how to 
make common modifications. 

Assume that the user knows 
nothing about a computer and 
cover every detail. Most busi- 
nessmen will not have read the 
disk operating system manual, 
the BASIC manual or anything 
else. These manuals are too 
technical and he doesn't want to 
waste time on them. 

Forget flow charts for the 
same reason. I eliminated them 
from my second manual and no 
one's requested them. They con- 
fuse most non-programmers. 

Once you have completed 
your program and documenta- 
tion, copyright it. For additional 
protection, I also use a license 
agreement. My license form has 
space on it to keep track of the 
modifications and corrections 
that I have sent to the licensee, 
and undoubtedly, you will have 
corrections and modifications. 

Even if you were to write a 
bug-free program, the dynamics 
of business and the computer 
industry will generate a need for 
changes and modifications. 

For example, I have sent out 
mods for DOS 2.3 and have a ver- 
sion available for NEWDOS. I 
also added special routines 
based on user feedback such as 
a recently completed price tag 
printing routine. 

Word of mouth advertising 
and recommendations are very 
important in this still small in- 
dustry and your reputation will 
suffer if you do not correct your 
bugs, keep your program cur- 
rent and answer user questions. 
Be sure to price your program 
high enough to cover some of 
these extra costs, along with 
shipping, manual printing and 
some return phone calls. If you 
plan to use a dealer network, 
leave sufficient margin in your 
pricing for their markup. A 
dealer needs at least a 30 per- 
cent margin to cover his costs of 
advertising, customer support 
etc. 

I hope that I have been able to 
give you some insights into the 
problems of developing a busi- 
ness program. There is a tre- 
mendous market potential out 
there, and if you can solve a 
business' problems, there is 
also great reward. ■ 
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EDITOR ASSEMBLER 

TRS-80" Model II 





from GALACTIC SOFTWARE 

ED AS 4.0 is the first user oriented Editor Assembler and was designed to utilize all the 
features of your Model II and TRSDOS operating system. EDAS 4.0 includes innovative 
features for ease of coding and debuging. EDAS 4.0 package includes complete, accurate 
documentation (over 120 pages). - (fcOOQ (\f\ 

also from Galactic . . . 

MAIL /FILE — A true name, address & phone number data base management system. The most versatile 
system of its kind. Up to 2,500 records per file. $199.00 

HOST I/O — Make full use of your Model II's communications ability. Your "BASIC" programs can now 
make use of the Model II's RS232 channels, with this full-featured "KSR" system. $199.00 

GALACTIC SOFTWARE LTD. Dept. 8, 11520 N. Port Washington Rd., Mequon, WI 53092 
^2M (414) 241-8030 

COD & Money Orders ■ Shipped Immediately Check Orders - A//ou> two weeks. 
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Index 
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Method 



* Get and Put Records to Disk File by 'KEY" 

* Read File in Key Sequence Without Sorting 

* Delete Records Without Recopying File 

* Add Records to Disk Files m Any Sequence 

* Variable Key Length From 1 to 50 Characters 

BUSINESS APPLICATION ADVANTAGES 

• Improved Disk Utilization 

■ Easier Program Development 

■ Improved Operating Characteristics 
Reduce or Eliminate Sorting 
Improved Performance 



ISAM SUBROUTINES 
ISAM UTILITIES 



Documentation 

On Diskette S50 00 



PLUS ■ Free Mailing List Sample Application 
Add 6"o Sales Tax for California Orders 
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TRS-80" MODEL I A II SOFTWARE FROM 
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Redding. CA 96099 {916)221-0740 

-WRITE FOR FREE CATALOG- 
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SALES COMPANY 

1412 WEST FAIRFIELD OR. 

PO BOX 8098 PENSACOLA FL 32606 

904/438-6507 

nationwide 1 800 874 1561 
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.. TWICE as fast! with 
poV oW 

^^ for your 

TRS-801 

We have benchmarked processing 
of payroll checks and journals 
and found them to run nearly 
twice as fast with THE 
SPOOLER installed. 

THL SPOOLER require no modification to your 
user application program. 



Price: $100. Ad*J $4. for credit card orders. 

AM SS. for C.O.D. orders 
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Model II version bow available. 
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REVIEW 



// you want fast and cheap storage, read on. 

Disk Alternatives 



Harley Dyk 
1644 Grant 
Grand Haven Ml 49417 



Most owners of TRS-80 16K 
Level II cassette based 
systems dream about disks and 
I am no exception. However, one 
must purchase the expansion 
interface, the disk, and more 
memory to fully utilize the 
system, and this costs nearly 
$1000. Some people seriously 
question spending this kind of 
money for only 79K of storage 
on line. 

The Stringy Floppy by Ex- 
atron, and the BETA-80 by Meca, 
both California based com- 
panies provide alternative in- 
vestments. Neither require the 
expansion interface and both 
will interest the hobbyist and 
small businessman. 

ESF 

When I purchased the Ex- 
atron Stringy Floppy (ESF), ship- 




Photo 1. Exatron Stringy Floppy. 



ment was prompt and the unit 
worked well from the beginning. 
The system is designed for the 
non-hardware type programmer. 

After plugging the ribbon 
cable into the keyboard and 
turning on the computer, you 
type SYSTEM, then /12345 and 
you are "talking" to the ESF. The 
ESF uses a continuous loop 
tape wafer which comes in 5, 10, 
20, 50 and 75-ft. lengths and can 
store about 4K, 8K, 16K, 40K and 
60K bytes respectively. 

The ESF for the TRS-80 is 
mechanically simple. The tape 
moves at a constant speed of 10 
in./sec. in one direction and is on 
only when the ESF is reading, 
writing or searching. These 
wafers seem quite reliable. I 
have had one wafer jam out of 
twenty-five and it was promptly 
replaced. They are available on- 
ly from Exatron, which is the on- 
ly negative point I can give the 
ESF system. 

The speed of the ESF is im- 
pressive with an actual 
read/write speed of 800 
bytes/sec. I use an 8" floppy 
when teaching and it loads 
BASIC programs at about 1300 
bytes/sec. I timed the ESF and 
loaded a 14K program in eigh- 
teen seconds. The same pro- 
gram took four minutes with 
audio cassette. 

The operating system resides 
in EPROM, but does not include 
data handling capabilities. Data 
capabilities are provided on 
tape taking up about 1 K of RAM, 
leaving about 14.5K for the user. 

The data handling capabili- 
ties are also very impressive. I 



was able to load the data for 
Adventure Land (a 21 -minute 
task for a Radio Shack cassette) 
in 41 seconds, over 30 times as 
fast. Data is dumped onto tape 
in 256 byte blocks. As a test of 
the ESF's speed, I dumped 500 
three digit numbers in ten 
seconds. It took fifteen seconds 
to read the numbers back and 
print them on the CRT. 

Machine language programs 
can also be placed on the 
wafers. I place Space War & 
Sargon on wafer with a mini- 
mum of difficulty. Machine 
language and BASIC programs 
are saved on the wafer by 
number and one must maintain 
a good record of what is on each 
wafer or one can wipe out ex- 
isting programs. 

The ESF seems very reliable, 
each program is checked each 
time it is saved by an automatic 
verification feature. This in- 
creases save time since the tape 
must cycle around yielding a 



save time of 40-60 seconds for a 
14K program on a 20-ft. wafer, 
and 80-115 seconds for the 
same program on a 50-ft. wafer. 
But compare that to over eight 
minutes to save and verify such 
a program on audio cassette! 
The verification feature can be 
bypassed by hitting the break 
key after the write light has gone 
off. 

Beta-80 

Meca sent me a BETA-80 to 
evaluate for this article. I have 
used it for about a month and 
have a fair knowledge of its ca- 
pabilities. The unit plugs into 
the keyboard as does the ESF 
and with the system tape (digital 
cassette) installed, you merely 
turn on the power. The tape 
rewinds, loads the operating 
system, and reads the directory 
in about 20 seconds. The operat- 
ing system resides in RAM and 
takes about 3Va K and the direc- 
tory takes about Vi K, so one is 




I 



licta-1 



ini 



Photo 2. The TRS-80 16K Level II -BETA-80 turnkey system (the 
BETA-80 labels were on back order at the time of this photo). 
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left with 11719 bytes in a 16K 
system. 

With some sacrifice in speed 
the BETA-80 offers you much of 
the convenience of a disk. As 
Meca advertises, the BETA-80 
has six-seconds access to 80K, 
while the Radio Shack disk has 
two-seconds access, but the 
BETA-80 gives a full 250K per 
track with two tracks, worst 
case access time of 36 seconds 
per track with 10 seconds being 
average. 

The actual data transfer rate 
on the BETA-80 is slower than 
the ESF with an advertised rate 
of 500 bytes/sec. The informa- 
tion is stored in 256 byte blocks 
with gaps in between giving an 
effective data rate of about 350 
bytes/sec. Yet the BETA-80 can 
locate and load a 9K program 
(out of a 250K track) in an 
average time of 35 seconds. The 
BETA-80 has a read/write speed 
of 5 in./sec., but a search speed 
of 100 in./sec. 

Once the cassette is inserted, 
it is totally software controlled. 
It sure is impressive to take all 
the software one has accumu- 
lated in ten months and put it on 
one cassette and be able to load 
any program at the stroke of a 
key. 

Double density will be 
available for the BETA-80, mak- 
ing its actual transfer rate very 
close to that of the ESF. Meca 
recommends digital tape for the 
BETA-80, however, I have used 
top quality Maxell UDXL C-60 
audio cassettes and have exper- 
ienced no problems to date. 

The BETA-80 can do a type of 
merge for programs, and it also 
can chain programs together us- 
ing LOAD statements within the 
programs. Data is saved only by 
saving arrays and this works 
fine, except that one must con- 
vert strings to numeric data in 
BASIC before the string can be 
saved in an array. This slows 
down the saving of strings con- 
siderably. 

The BETA-80 also saves ma- 
chine language programs, al- 
though one must use a stand 
alone operating system in high 
memory. Since the operating 
systems in BASIC reside in the 
same area in which most ma- 
chine language programs start, 
you cannot use the regular oper- 



ating system to load such ma- 
chine language programs. Meca 
recommends only the experi- 
enced assembly language pro- 
grammers use the stand alone 
system, but this beginner was 
able to use it to transfer ma- 
chine language programs from 
Radio Shack cassette to the 
BETA-80 format. 

Comparisons 

When comparing the two sys- 
tems, you must keep in mind the 
price difference, which is sub- 
stantial, and media handling dif- 
ferences. 

The ESF requires frequent 
switching of wafers, but should 
be adequate for the hobbyist, 
average home computer enthu- 
siast and some small busi- 
nesses. If you want the luxury of 
the directory, universal media 
(digital quality cassette), lots of 
on line storage, and the proven 
Phi-deck, then the BETA-80 may 
be for you. 

Tables 1 and 2 show a com- 
parison of features and a sum- 
mary of BASIC commands. Both 
units have performed very well 
for me. Both can give a very 
powerful system without an ex- 





Beta 


LOAD- 


* — load program (name up to 5 characters) 


SAVE" 


- save program 


LOAD" 


R" - load & run 


LOAD- 


- load array 


SAVE"* 


" - save array 


MERGE" 


- concatenate to BASIC program 


MERGE" 


,B" — concatenate & run 


NAME 


— shows directory 


KILL" 


-kill program 


KILL" 


-kill array 


— plus 19 direct operating commands to mount tapes. Initialize tapes, read & 


write blocks ot memory, execute machine language programs, etc. 




ESF 


® NEW 


- certifies & erases wafer (or part of wafer) 


9 SAVE X 


- save BASIC or M.L. Program, where X is integer from 1-99 


O LOAD X 


- loads BASIC or M.L. Program, where X is integer from 1-99 


OOPEN 


- open data file 


• CLOSE 


- close data file 


® PRINT 


— writes data on wafer 


O INPUT 


- reads data from wafer 




Table 2. BASIC Commands. 



pans ion Interface or additional 
memory. Both units leave 
CLOAD & CSAVE totally func- 
tional, to your regular audio 
cassette can be used as a 
backup. This also allows you to 
transfer existing audio cassette 
software to the new media. 

Face it, a disk is nice, but, 
quite frankly, not everyone 
needs the speed or price of a 
disk. However, most TRS-80 



owners deserve more than audio 
cassette and such computerists 
should seriously consider the 
ESF and BETA-80. ■ 



Exatron now has available a speed-up kit 
for the TRSS0 (about $25) that doubles the 
speed of the computer and the ESF. Install- 
ing the kit means opening your computer 
and voiding the warranty, but the kit 
doubles the load and save speeds of the 
ESF, as well as the capacity of a wafer. This 
gives you, in effect, double density without 
touching the ESF: 1600 bytes/sec. 



Base Price 


ESFforTRS-M 

$249.50 

Starter System ® $299.50, includes 

wafers, monitor, etc. 


Beta-80 

$499.00 


Cost of Additional Drives 


$199.50 


$270.00 


Drives per System 


8 


4 


Tape 


Wafer-continuous loop-1 direction travel- 
obtainable only from Exatron 


Standard digital cassette 


Dealers 


None-mail order only 


Yes — or mailorder 


Size 


4Viwx6Vidx2mi 


8"Aw x lOVtd x 4 'Ah 


Weight 


Approx. 1 lb. 


Approx. 6 lbs. 


Read/Write Speed 


800 bytes/sec., 10 inJsec, 720 bits/in. 


500 bytes/sec, 5 InJsec., 800 bits/in. 


Fast Search Speed 


None 


100 InJsec. both directions 


Capacity per Drive 


40-44K with 50 ft. wafer 


500K with C€0 tape 


Media Cost per M Byte Storage 


$46 (23-50 ft. wafers) 


$8.60 


Compare to Cassette Speed 


12.5 times faster at best than cassette 


5.6 times faster at best than cassette 


Warranty 


Year/30 day money back 


3 months mechanical 
6 months electronic 


Expansion Interface Needed 


No 


No 


Programs/Unit 


Max. 99 programs/wafer 


Max. 126 programsrSOOK byte 
cassette 


Total Software Control 


Yes 


Yes 


Directory 


No 


Yes 


Toll Free Number 


Yes 


No 


Work with Level III BASIC 


Yes 


No 


CLOAD & CSAVE Functional 


Yes 


Yes 


Worst Case Across Time 


60 seconds for 44K (SO ft. wafer) 


36 seconds for 500K 
10 second average 


Verification 


Automatic - can be bypassed 


Automatic but can be turned off 


Machine Lang. Cap. 


Yes 


Yes 


Operating System 


InEPROM 

Table 1. Comparison ot features 


In RAM 
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HARDWARE 



Try this inexpensive circuit, 

and meter your load level accurately. 



CLOAD Micrometer 



Bertram A. Thiel 
159 West Main Street 
Frostburg, MD 21532 



The touchiness of the TRS-80 
volume control setting is a 
persistent problem. If you are 
using commercial software and 
are frustrated with trial and error 
loading, try this simple hard- 
ware fix and save your hair- 
pulling for debugging. 

Construction 

The voltage level of a properly 
loading tape on my Level II 
machine is approximately 0.3 
VAC, not very high, but with a 
sensitive enough meter the 
volume control of the tape 
recorder can be adjusted before 
CLOAD is entered. A sensitive 
meter will be in the microampere 
range, and all such meters are 
DC. We, however, are dealing 
with an AC signal from the tape 
deck. 

The solution is to rectify the 
signal with a diode, but since 
silicone diodes only start to con- 
duct at .7 volts, the older ger- 
manium diode that conducts at 
.3 volts will work best. 

Did your eyebrow rise when 
you realized that the conduction 



Pan* List 

D1 - 1N34A or equivalent germanium 

diode 

R1 -5K trimmer resistor 

M1 — 50 microampere DC meter, 

Lafayette 99-51146 or equivalent 

P1 -3.5mm mini-plug with cord 

J1, 2-3. 5mm mini-jack, chassis 

mount 

Parts List 



voltage level of .3 volts is the 
same number as the .3 volts AC 
of the signal? 

Don't worry. We have the 
square root of two working for 
us. Did your other eyebrow rise? 
Well then, just remember that 
AC is measured as RMS or root 



mean squared. To find the peak 
value, multiply the RMS value by 
1.414 which gives us about .42 
volts. This, minus the .3 volt de- 
tection level of the diode, leaves 
us with .12 volts to work with. 
The remaining voltage is fed to 
the meter and displayed (see 
Fig. 1.). 

The extra jack on the 
schematic is for an earphone if 
you wish to hear your CLOAD as 
well as see it. 

Implementation 

After you have constructed 
the project, initial adjustment is 
a snap. First, CLOAD a long pro- 
gram into your TRS-80, making 
sure it loads correctly. Discon- 



V 





Photo 1. Finished project 



Fig. 1. CLOAD meter 



nect the plug from the earphone 
jack of the tape deck and insert 
it in either of the meter jacks. 
Take the mini plug from the 
meter and insert it in the ear- 
phone jack. Now CLOAD the 
tape again and the meter should 
deflect when data begins to 
flow. 

Even if it doesn't, proceed to 
the next stage and turn the trim- 
mer resister until the needle 
reads half scale or about 25 
microamperes. As data is read 
the needle will rock back and 
forth; get used to this so that 
when you play a commercial 
tape you will know when the 
volume control of the tape deck 
is properly adjusted. 

If the tape loads properly, 
plug in the earphone. The extra 
load on the output will change 
the voltage level but adjustment 
is now easy; just change the 
cassette volume control for the 
average reading of 25 micro- 
amperes. ■ 
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g^f^PRODUCTS^TRS-SO 




MALL 
YSTEM 



NEW! 



MHISTLER: MOHE CONTROLLER INTERFACE - 134.95. New hardware product that 
controls lights, appliances, computer peripherals, darkrooa tiners and other 
115 volt devices anywhere in your house! Software controlled by cassette 
cable. Use with Sears or BSR Ho»e Control Systea with ultrasonic option. 
Assembled, tested, self-contained, and includes Basic software. 

TtS-80 DISK t OTHER MYSTERIES - S22.95, H.C. Pennington. Best disk book 
we've seen! Directory secrets, file formats, damaged disk recovery, etc. 

LEARNING LEVEL II - $15.95, D.A. Lien. Learn Level-2 like you did Level-1, 
step by steo. Same author and style as Level-1 manual. Super new book! 

UTILITIES 

RSN-2: MACHINE LANGUAGE HON I TOR FOR 16* TRS-80 'S - $26.95 
RSR-2D: THREE VERSIONS OF RSN-2 FOR DISK SYSTEMS - 29.95 
RSM-2 RELOCATOR: PUT RSH-2/2D ANYWHERE IN MEMORY - 9.95 

Machine Language monitors with Z-80 disassembler! HEX and ASCII memory 
dumps; EDIT, MOVE, EXCHANGE, VERIFY, FILL, ZERO, TEST, or SEARCH memory, 
read/write SYSTEM tapes, enter BREAKPOINTS, PRINT with TRS252 or Centronics, 
read/write disk sectors directly! RSM-2 tape loads at top of 16K LEVEL I or 
II; RSM-2D disk includes 5 versions for 16K, 32K and 48K. 

DCV-1: CONVERT SYSTEM PROGRAMS TO DISK FILES -19.95. Execute Adventure, 
Air Raid, RSL-1, ESP-1, T-BUG, etc. from disk, even if they interfere with 
TRSD05! New version works with TRSOOS 2.3. 

BASIC-1P: LEVEL-1 BASIC WITH PRINTING! - $19.95. Run any LEVEL-I BASIC 
program on your 16K Level-2. PLUS LPRINT and LLIST with our TRS232 or 
Centronics. Furnished on tape; can be used from disk. 

MACHINE LANGUAGE GAMES 

AIR RAID, BARRICADE or RSL-1: - $10.00 each, all 3 for $25.00 

AIR RAID: A super shooting gallery; our most popular game. Ground based 
missile launcher shoots high speed aircraft! Hours of fun! 

BARRICADE: "BREAKOUT" for the TRS-80! Break through 5 walls with 
high-speed ball and keyboard controlled paddle! 96 different options! 

RSL-1: Enter patterns with repeating keyboard! Save patterns on tape (* 
furnished). Play John Conway's LIFE. FAST - about 1 second per generation! 



SMALL SYSTEM SOFTWARE 



P.O. BOX 366 



NEWBURY PARK, CA 91320 



MODEL-II TRS-80 - 

CP/M" VERSION 2.0 FOR THE MODEL-II - $170.00. Latest version from Digital 
Research. Runs both single and double density disks! "Standard" version 
runs nearly any CP/M software, including Cobol, Fortran, C-Basic, N-Basic, 
business and accounting packages, etc. Hundreds of programs available! 

RSMII: ENHANCED RSM MONITOR FOR THE MODEL-II - $39.95. Relocatable version 
of RSM-2D plus screen editor for modifying either memory or disk sectors in 
both He> and ASCII, split screen scrolling, and formatted serial or parallel 
printing. Sold on self-booting disk; directions to save as TRSDOS file. 

PROFESSIONAL SOFTWARE 

THE ELECTRIC PENCIL FOR THE TRS-80: TAPE-$99.95, DISK-$150.OO. Popular 

video editor for creating and saving text files. Prints formatted copy with 

right justification, page titling t numbering, etc. Upper case only, or 
lower case with modification. 16K Level-1 or 2 (tape). 

CP/M" OPERATING SYSTEM FOR THE HODEL-I - $145.00. The 8080/Z80 "Software 
Bus for the Model-1 TRS-80. Includes TRS232 and RS-232-C software, 
lower-case support, debounce, 0CV-2 and other unique utilities. Allows use 
of many available programs written for CP/M. 

PRINTER SUPPORT 

TRS232 PRINTER INTERFACE - $49.95 ($59.95 after June 30). Assembled 5 
tested printer interface for RS232 or 20-mil current loop printers. 
Expansion interface not required. Print from level-II BASIC, CP/M, 
BASIC-1P, ELECTRIC PENCIL, etc. Standard cassette software included. Add 
$2.00 for shipping. 



TRS232 "FORMATTER" SOFTWARE PACKAGE - $14.95. Adds 
control, printer pause, "smart" line termination, etc 



page 
, to TRS232. 



d line length 



RSH232: Adds RS-232-C capability to RSM-2/2D monitors - $9.95 
PEN232: RS-232-C for cassette version Electric Pencil - 9.95 
EDT232: TRS232 and RS-232-C for tape version of EDTASN - 9.95 

OTHER PRODUCTS FOR THE TRS-*) 

ESP-1: $29.95. Assembler, Editor, Monitor (8080 mnemonics) 
LST-1: 8.00. Listing of Level-1 BASIC with some comments 

••CP/M tm Digital Research, Inc. 'TRS-80 tm Tandy Corp. 

See your dealer or order direct. Calif. Residents add 6X tax 



SMALL SYSTEM SOFTWARE 



P.O. BOX 366 



NEWBURY PAH, CA S1320 



New from 




CREATE SUPERIOR GRAPHICS 
& ANIMATION 

Master Graphics Reference. Displays TRS 80 keyboard 
and graphics characters in all horizontal and vertical 
combinations. Thousands of shapes, screened 63 at a 
time. Or instantly access a specific group. People, animal, 
vehicle, symbol shapes you didn't believe were there 
Ideal reference for animation, graphic ideas, symbology 

-■ fly"sh"oot, 
chase, tee up 

Sumfun One. Eight great games in one extended pro- 
gram. Take off and land from "Carrier'' Set "Chopper'' 
down safely with engine out Shoot em down in "Jet 
Attack." Net "Butterfly'' in a wild chase Play "Front 9" 
mini-golf Hit "Fracshot "s split-second target All genuine 
challenges that sharpen your skill, hold your interest 
for hundreds of plays. Also "Dead Heat" (horse race), 
"Hotsy Totsy" (number search) for family & party fun 

Programmed in BASIC for TRS-80 Lev. II, 16K. 

Double-load no rewind format. Top quality digital 

cassettes, double wide pads, stainless pins. 

nylon rollers, screw shells. Individually lab 

checked. Cased 

Each. $16.50 Both. $30.00 
If dissatisfied, return for full refund. 
Florida residents add 4% sales tax. 

Order today from 




Suite 406 • 537 S. Sequoia Drive 
West Palm Beach, FL 33401 



►^217 



TRS-80*TRS-80*TRS-80*TRS-80 

Model I sysiem owners 
SYSTEM TOO SMALL? 

We lake trade-ins on Model II 
We also buy used sv stems outright 

Call or write lot quotation 

USED TRS-80 SYSTEMS 

We sell used Ice) boards, c\p.ini.. 

disk drives, etc. 

Call or write lor quotes 

NEW HARDWARE IN STOCK 

I6K level II $749.00 

Radio Shack disk drives $449.(K) 

ink Memory-Lifetime warranty $89.00 

Centronics 779 trac. $995.00 

IDS 440 Paper Tiger $949.00 

SOFTWARE 

Data Management Sv stem-Mod I or II 

An excellent dcsiKii-ii-vourscll 

software package- $99.0(1 

L'tili/es and requires Kacet Computes 

C.SI andCOMHROC 

WORD PROCESSOR FOR MODEL II 

WORDSCRIBl -Bv Microphase Svstems 

A lirst lor Model II-$I50.00 

Completely Integrated automatic 

letter writer lor Model II 

Consists of WORDSCRIHL. WORDMAII . 

MAN I IS I $250.00 

II e Represent 

RACK! COMPITHS. "NK.V»IX>S.KI.KCIRIC 

Pr.M II.. >>MAI I. MSTKMS MIKTVt ARK. 

INS! AM SOKTVi ARK. TB>. PRtK.RAMMA. 

NONPARIKI . Mlt ROPHASK SYSTEMS, 

TARAVrt) 



VKRN STREET PRODUCTS 

1 14 W. Tali Sapulpa. OK 

74(166 (9IX)224-426() 



• 111 

Radio /hack 



TERMS-COD WELCOME.. CASH. CHECK. OR MONEY ORDER 
ADD 3V.FOR MASTER CHARGE AND VISA 



ledger TWICE as fast! with 




Jor your 

TRS-801 

We have benchmarked processing 
of monthly transaction reports 
and found them to run near- 
ly twice as fast with THE 
SPOOLER installed. 

THE SPOOLER requires no modification (o your 
user application program. 

Price: $100. Add $4. for credit card orders. 

Add SS. for C.O.D. orders 
Documentation available separately for SI0. 
Model II version now available. 

Phone (513) 891-44% or write: 



Snapp Inc. 



• 232 



TRS« i» • lr«U»ma/» ol lh« RMO SftacH [>..•»>> Ot T»nO» Co>BO<«tio* 



^Reader Service — see page 162 
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UTILITY 



Get a graphic display when 
CLOADing your Level I or II tapes. 



CLOAD Monitor 



Norman D. Whaland 
430 E. 9 Street, Apt. 15 
New York NY 10009 



I've had no major problems 
with my Radio Shack TRS-80, 
except for one thing — loading 
tapes. Every tape I buy requires 
a different volume setting. Find- 
ing that setting often involves a 
half-hour of frustration. 

The problem is this: the blink- 
ing stars that tell you the tape is 
loading are displayed only if the 
setting is correct at the very 
beginning of the file. Rewinding 
is needed for each new setting. 
Nor is that all. When the stars 
finally appear, BASIC may well 
respond with a WHAT? — indi- 
cating clearly that its little sign 
of encouragement was not to be 
construed as complete approv- 
al. 

I have ended these problems. 
My Tape Monitor program dis- 



II 



plays continuous feedback on 
the quality of the input. In less 
than a minute I can find a 
volume level well within the ac- 
ceptable range, so that I can be 
sure that it will work reliably. 

The program was written for 
Level I, but it can be adapted for 
Level II with a few small modi- 
fications, as indicated on the 
listing. (No ROM subroutines 
are used.) I will assume Level I 
throughout most of the discus- 
sion. Except that the intervals 
between pulses are half as long, 
Level II tapes don't differ from 
Level I tapes in any way that af- 
fects use of the Monitor. 

Tape Format 

The Tape Monitor produces 
graphs that summarize the tim- 
ing of the input signals. In most 
cases the guidelines at the end 
of this article will suffice for 
finding the correct volume set- 
ting. If something is wrong with 
a tape, however, you will want to 
know precisely what the graph 



fi n l 



MILLISECONDS 
BIT VALUE 



Fig. 1. The Level I tape code. 



means. Therefore we must first 
consider how data is repre- 
sented on tape. 

Fig. 1 shows what the bit se- 
quence 01 looks like on a Level I 
tape. Clock pulses, marked with 
a C in the figure, appear at inter- 
vals of four milliseconds. Each 
clock pulse marks the beginning 
of a bit. Data pulses appear mid- 
way between the clock pulses at 
the positions marked with a D. 
The value of the bit is one or zero 
depending on whether the data 
pulse is present or absent. 

When the cassette interface 
detects a pulse, it sets a flip-flop 
that the program can test. It re- 
mains set until the program re- 
sets it. The CLOAD routine 
reads the bits by testing and 
resetting the flip-flop on a 
precise schedule. 

CLOAD first locates the clock 
pulse by repeatedly testing the 
input. The moment when the 
pulse appears is established as 
time zero of the read cycle. After 
a delay of one millisecond, the 
flip-flop is reset. (The times 
when the flip-flop is reset are 
marked with a > in Fig. 1.) 
After a further delay of two milli- 
seconds, CLOAD tests the flip- 
flop and saves the result as the 
data bit. The flip-flop is im- 
mediately reset and the wait for 



the next clock pulse begins. 

Thus, if a pulse is detected at 
any time from one to three milli- 
seconds after the appearance of 
the clock pulse, the bit is read as 
a one; otherwise it is read as 
zero. 

Clock and data pulses are 
physically identical. The CLOAD 
routine distinguishes them by 
their timing. Each file begins 
with a leader consisting of 1024 
zero bits. Since all of the pulses 
in the leader are clock pulses, 
CLOAD is able to synchronize 
its timing with the tape. 

All of the bits in a file are writ- 
ten as one continuous stream; 
byte boundaries aren't marked. 
To enable CLOAD to synchro- 
nize with the tape at the byte 
level, the special character A5H 
appears at the end of the leader. 
When CLOAD encounters this 
character, it begins assembling 
sequences of eight bits into 
bytes. The first four bytes 
specify the beginning and end- 
ing addresses of the area where 
the data will be stored. After 
them come the data bytes, fol- 
lowed by the checksum byte. 

The two stars are displayed 
when the A5H character is en- 
countered. Whenever a carriage- 
return character is read, the sec- 
ond star is removed or replaced. 
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EVEN COMPUTERS GET THE BLUES 



Ha* you TRS-30 been sluggish toley Stow to respond"* Had 
excessive keyboard bounce'' 

The problem might be tow voltage, or a BASC rmsunderstandtog. or 
IRON POOR SOF TWAREI 

Do you serve your TRS-SO s meals on paper sheets? Do you 

(shudder) write tt yourself Recent studies indicate that keyboard- 
feeding causes MALIGNANT BUGS' 

CLOAD Magazine is pubtshed monthly on a magnetic IPON OXIDE 
tape, wound up mside a C-30 cassette Now you may ash "Why 
bother^ ". but I can assure you that our computer cassettes are 
DIRECTLY readable, i repeat DRECTly readable by your 
computer. We have Thrills. Variety, and A&surdrtv We have 
every program your computer has ever wonted to run otter 
o hard day at the job We even include our infamous "yeiiow 
sheets wtth every «$ue. filed with lies about the TRS-SO 
computing scene 

12 Monthly cassette issues . S36 OO * 

(over 60 programs) 
Single issues 5 350* 

Best of CLOAD SJOOO* 

(9 programs w/ listings) 

* CA residents please odd 6% to non-subscnptton oraers 
Ptease write for overseas rates 

Master Charge / Visa Welcome Also Cash & Gold 

CLOAD ■ 




IVI AC3 A Z I l\J EE • P.O. Box 1267 • Goieta. CA 930F • (805) 964-2761 



— Tr\S-80 MODEL II USERS — 




w#.l 



Prei *t%« — Protect — DiipJay 

your equipment with 

CRYSTAL CLEAR 
PLASTIC COVERS 






I14«S*C 

11* ■■■, M 



*fcll< JO l>0«|> *V* 

(Mvw ■•>•«•>•> ii<m 4% f*t —*', 
ImoOucioor OWto D*j> both co**» ft %o**> 



Combination prke 134.93 
including, pot 1 09* 



Crnun FUilic Co. "' 26e 
3746 N Colege 317-9255566 
Indionapoltk. IN 46225 



alphanelics 

TRS-80© ""' 
TAPE DIGITIZER 



L'Md by the 
U.S. (MH 
l.nurd and 
U.S. Ae»> 



IU«I«A1(» CAtSIITI 
LOAOMS AMD COTVIMQ 

noiun . tvcN 
-trttar iwi •• 
make » T » *f rwoiuii 

LOO Oia PfUCTICAi.lT M 
DlftNMNT 0* VOV.UMC 
COMTHOl 9CTTIKOI 
•H*M t PiAMCT COP*t 
Of AMT IWI DiOr1W.lv 
WTIfOIITlMINOCOM 

rvTm otorrnioTom 

*cr ■•n.toi o» mm. 
SNMM. wwu nntowNs 
MUM, MOM 4*0 O'HtK 

mmor omopouts 

•AC POWtP*D«0MI 
TVHO* CAMfTTI flMlf CM 
AU.0W1 MANUAL O* COM 
Pl/Tt* COKTMOL Of CAS 

sent «conot« 

•EEEO VOUR CAMCTTI TO 

TMI TAP* MQiTUf. » MM3 
rilO VOUM COMPUTE* 
TMI EXACT OKMTAi 
«M rVOMJ TMI TM« 
OAVt TO TH| TAPf WHM. I 
MMIMOACOPT AT THE 
SAME TMM 
•THE TAPE MH|P ■ 
COMflETtlT COMPATWiE 
WTM IffVB. I ANO a 



4M0 4»4/f4Ali mttMOf! 

CAvnrn *finnt 



154.95 




$59.95 



«ir"« •«•« '«« •■<.! «ui 
»»• *w • tun ■*<r4tfr<* 

~ • >m - *• •. •■ .•.-■■•.« 

4..I. nyl-r- 



C07I»S7/*2V 



jor your 

TRS-801 

IMI NTIMHIMwpwUalhCIOSKM'fllKtMMIurMI 

pwi' output opnaiiom flow irtrphyurM function of 
in* tame infMii. »«apwi opnoiKMi Tim ptocettot And 
IniMCf can lurtct.oa MxMpm J c w N of eavti atlvft Av 
a rcMtli. typical cumanmial appbctuom run 
aearl* I W l< I at fata. 

nil sflMH H oil r« atio rnnrccvf juration— no 
m«uirrd anvowm «>l r»emar> or waffrr tfiav* nM 
dMntiulMM drti provMln 40 Jiuinci vmion* of THE 
SPOCHXR^O lot «* in a 4*k >,mkr am] 20 lor u«r 
■ft 1 I2K «yMrm 

IHI ■vTIMMrl rrtjuMf^ no rModiricMian 10 your 
visr' apfilicMiun prof ram 

Knrr SIM. \<M $4. far rrraa card onJtn 
Ml $5. far ( O.D. atem 

UoruAnrataiioa a«aMaMt Mpamab far SIO. 
Model II version now available. 

Phone (5131 99I-44H or mile: 

Snapp Inc. .» 
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DEBUG-S/S 

FOR YOUR TRS-80* 
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AT LAST!! 

A POWERFUL 

DEBUG MONITOR 

FOR THE 

EXPERT & NOVICE 

PROGRAMMERS 



DEBUG-S/S is i uniquely powerful monitor lor: (1) analyzing. (2) 
creating or modifying, and (3) debugging machine-language pro- 
grams on your level II. 16K system. 

EFFICIENT - SIMPLE - FUM 

No longer do you need to keep reaching for your reference card or 
searching through your program listing while debugging your pro- 
gram — Most all of this information is at your fingertips with 
DEBUG-S/S. Warning - Debugging your program with DEBUG-S/S is so 
efficient and convenient that you may find yourself wishing that you 
had more bugs to find 

RUN IN SLOW MOTION 
With DEBUG-S/S you may run your program in slow motion or single 
step and observe your Z-80* registers dynamically and/or observe 
your message printing on the screen one-character-at-a-time' 

SPLIT/SCREEN DISPLAY 

DEBUG-S/S uses a convenient split screen display system The upper 
right section of the screen automatically displays upon entry to 
DEBUG-S/S from the user's program. This section shows the user's 
next instruction in hexadecimal and disassembled symbolic form, and 
also shows the user's major Z-80* registers The left portion of the 
screen is for the user's display or a scratch pad area for memory 
dumps. The lower right section of the screen is where DEBUG-S/S 
commands are entered and echoed for the user's inputs 

TRANSPARENT MODE 

DEBUG-S/S may be operated in a transparent mode which leaves the 
entire screen showing all of the user's display data upon entry to 
DEBUG-S/S. except for the letter D displayed on the upper right corner 
of the screen indicating that DEBUG-S/S has been entered If the user 
now wishes to examine his Z-80* registers, he simply types D (Display) 

"NO CRASH" BREAKPOINTS 

DEBUG-S/S uses a single byte breakpoint which means you may put a 
breakpoint in the first byte of any instruction in your program and not 
cause your program to crash because of the breakpoint insertion. Your 
breakpoint will stay active until you reset it or redefine it This allows 
you to run through loops in your program repeatedly without having to 
redefine your breakpoint each time You may enter any number of one 
byte pseudo breakpoints simultaneously in your program manually 
with the Memory command 

POWERFUL COMMANDS 

Examples of DEBUG-S/S commands are Jump - Go - Breakpoint - 
Memory examine/modify - Hex Dump - ASCII Dump - Symbolic Instruc- 
tion Dump - Single Step - Automatic Step start/stop - Increase/ 
Decrease Auto Step rate - Clear Screen and save cursor position - Clear 
Screen and home cursor position, plus other commands. 

YOU WILL RECEIVE 

You will receive a cassette and instruction manual DEBUG-S/S is 
assembled into lower memory on one side of the cassette and into the 
top of 16K memory on the other side. DEBUG-S/S uses 4K of RAM 

'TRS-80 is a trademark of !h« Tandy Corporation '2-80 is a trademark ot Zilog 

Send check or money order payable to: 

CALSOFT 

4421 Gilbert St. #303 
Oakland. CA 94611 

California Residents add 6.5% Sales Tax 
(PRINT) 

NAME 



$39 95 



ADDRESS. 
CITY 



STATE 



If the A5H character isn't read 
properly, CLOAD continues 
reading a bit at a- time until it 
finds one. Since A5H bytes don't 
normally occur in BASIC pro- 
grams, what CLOAD finds will 
actually be the end of one byte 
combined with the start of the 
next. The stars appear, but don't 
blink very often, because the 
carriage-return characters are 
read out of synchronization and 
aren't recognized. 

A particularly unpleasant 
consequence of missing the 
A5H character is that the ad- 
dresses eventually used to load 
the data are incorrect. As a 
result, the areas of RAM used by 
BASIC could be destroyed. 
That's why it's a good idea to 
turn power off when CLOAD 
fails; some of the data areas 
aren't initialized when you push 
the RESET button. However, if 
you stop the recorder before the 
stars appear, there is no need to 
power off or even push RESET. 
You can simply rewind, adjust 
the volume, and try again. 

If the beginning of the file is 
read normally, synchronization 
may still be lost if errors occur 
farther on. Synchronization at 
the bit level is restored as soon 
as a zero bit is read, but syn- 
chronization at the byte level 
may be lost permanently. When 
this happens, the stars stop 
flashing. 

It's also possible for errors to 
occur without loss of synchroni- 
zation. In that case, the check- 
sum computed by CLOAD 
doesn't match the checksum on 
the tape, and the WHAT? mes- 
sage is displayed. 

It's obvious what happens if 
the volume control is set too 
low. Either the pulses can't be 
read at all, or pulses are missed 
occasionally. Usually, the latter 
occurs only in a very narrow 
range of volume. 

What happens at too high a 
volume came as a surprise to 
me. I assumed that noise on the 
tape would show up as spurious 
pulses. This does happen some- 
times, but the usual problem is 
that the pulses lengthen as the 
volume increases. When a pulse 
continues to give an input signal 
for more than a millisecond, it is 
read twice. A data pulse, for ex- 
ample, may be read once as a 



data pulse and again as a clock 
pulse. 

It might seem that byte syn- 
chronization would surely be 
lost when the volume is too 
high. My experiments with the 
Tape Monitor have shown that 
this isn't so. If the volume is just 
a little too high, errors due to 
long pulses are sporadic. Bit 
synchronization is lost when a 
data pulse is too long, but com- 
plete synchronization is re- 
stored if no further error occurs 
before a zero bit is reached. That 
bit is converted to a one. The 
stars flash normally right to the 
end, but the WHAT? message 
appears. 

When the volume is too low, 
on the other hand, byte syn- 
chronization is almost sure to 
be lost. As soon as a clock pulse 
is missed, synchronization is 
lost and not regained. 

Program Description 

The Tape Monitor reads bits 
in groups of 255. At the end of 
each group, it displays the tim- 
ing of the pulses as a bar graph. 
Each graph remains on the 
screen for approximately one 
second, while the next group of 
bits is being read. Some typical 
graphs are shown in Fig. 2. Their 
significance will be discussed in 
the next section. 

Time is represented horizon- 
tally on the screen and is 
reckoned from the moment the 
clock pulse is first detected. 
Each bar in the graph represents 
an interval of 0.1 millisecond. 
The length of the bar represents 
the number of bits for which a 
pulse was detected during the 
interval. 

The vertical scale is loga- 
rithmic, using base 2. A bar of 
length one indicates a count of 
one; a bar of length two indi- 
cates a count of 2-3; a bar of 
length three, a count of 4-7 and 
so on. 

Processing centers around an 
array of 64 counters, one for 
each bar in the graph. (In the 
Level II version, 32 counters are 
used.) The counters are ad- 
dressed through the HL register. 
When thinking about timings, it 
is convenient to number the 
counters from one to 64, in- 
dicating how many tenths of a 
millisecond have elapsed since 
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the clock pulse began. For pro- 
gramming reasons, the corre- 
sponding L register values are 
two to 65. 

When a clock pulse hasn't 
been detected by the time 
counter 63 is reached, counter 
64 is incremented. Thus, the last 
bar in the graph shows how 
many times the interval between 
clock pulses was too long to 
display. 

The program has tour sec- 
tions. NEW clears the counters 
and waits for a zero bit, in order 
to establish synchronization. 
READ reads the tape and tallies 
its findings in the counters. 
GRAPH creates the bar graph. 
BREAK handles input from the 
keyboard, as described in the 
operating instructions. 

Most of the program is quite 
straightforward and needs no 
explanation beyond the com- 
ments in the listing. The READ 
routine, however, is a bit tor- 
tuous, because of the stringent 
timing requirements. (I ended up 
with only 13 cycles to spare.) 

READ is a loop, executed 



nru 



a) 




b) 



once every 170 machine cycles 
or approximately once every 0.1 
millisecond. At the beginning of 
the loop, the status of the input 
flip-flop is transferred to the 
carry flag, and the flip-flop is 
reset if necessary. After that, 
the course of processing de- 
pends on the carry flag and on 
the contents of the L register. 
The carry flag remains undis- 
turbed for several instructions, 
until it is finally altered by a CP 
instruction. 

If L lies between one and 63, 
inclusive, it is incremented. If a 
pulse was detected, the counter 
that HL then addresses is in- 
cremented. In addition, if the 
new value of L is greater than 32, 
the pulse is assumed to be a 
clock pulse, and L is set to one. 

If L contains 64, it is in- 
cremented, and the last counter 
is incremented whether or not a 
pulse was detected. If a pulse 
was detected, L is set to one. 

If L contains 65 and no pulse 
was detected, both L and the 
counters are left unchanged. If a 
pulse was detected, L is set to 



[L 




Li 



C > D > C 



Jl 



c) 



J 



J L 



fli 



J 



d) 
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D 





Fig. 2. Graphs displayed by the Tape Monitor, (a) acceptable volume, 
(b) Volume too low. (c) Volume too high, (d) Stray pulses. 



A new approach 
for easier programming! 



%PROC SBT 

%CALL INITSBT 
%CALL XALL 
%CALL FINISH 

END 
%END-PROC 



STRUCTURED 

RASIC 
TRANSLATOR 



by 

Gene 

Bellinger 



Tired of attempting to make program modifications 
without being foiled by line numbers and GOTO's? 
Have you managed to forget how portions of your 
programs work because you left out the REMARK 
to conserve memory and speed up execution? If 
these and other drawbacks of BASIC keep you 
from getting things done, then Structured BASIC 
Translator can provide some relief! 

This is not a programming language but rather a 
utility which runs from disk. It allows you to write 
structured programs using PROCEDURES, 
CALLS, CASE-CALLS. IF-THEN-ELSE, WHILE 
and UNTIL structures with no line numbers and no 
GOTO's. You write a structured program using the 
provided editor, or use most any other editor. The 
Structured BASIC Translator will then convert the 
file created by the editor into an efficient, execut- 
able BASIC program. 

The strength of this package is its small size and 
fast translation. For example, the source code for 
the program itself, which is provided on the disk, 
will translate in less than 4 minutes. This is impor- 
tant because with this speed you will not hesitate 
to alter or modify a source listing. 

Acorn produces several other utility programs 
for the TRS-80*. These include Aterm, Term-80, 
and Numbering by Tom Stibolt; Disassembler, 
Tape Utility, and Disk Utility by Roy Soltoff . Ask for 
these and other quality Acorn programs at your 
local computer store. 

* TRS-80 is a trademark ol Tandy Corp 




Software Products, Inc. 



634 North Carolina Avenue. S.E . Washington, DC. 20003 



• Reader Service — see page 1 62 
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one. The L register contains 65 
when READ is entered from 


through the loop, the routine 
tests the BREAK key and 


4E4C 


C8 


45 




READ3 


8IT 


0.L 


Intarval tallies? 


NEW. 










branches to BREAK if it is de- 


4E4E 


20 ii 






JR 


NZ.READ4 




Whenever L is set to one, 


the 


pressed. 


4£50 


2C 








INC 


L 


Noi tally Intarval 


completion of the bit is tallied in 
register D. The routine branches 
to GRAPH when 255 bits have 
been processed. 


Using the Program 

The program is entered at 
location 4E00H. It turns on the 


4ES1 
4E52 
4E54 

4E56 


34 
30 0C 

18 ED 
FD 2A 


it it 


REA04 
THE 3 


INC 
JR 
JR 
LD 


(HL) 

NC.T1HE1 
READS 
1Y.(0000H 


IF pulaa praaant, 
go to flrat countar 
) Tlalng dalay 


At the end of 


each pass 


cassette at once and begins 


4C5A 


FO 


23 






INC 


\1 


















4C5C 


ED 


5F 




T1HE2 


LD 


A,R 


Tiaing dalay 
















4E5E 

4C60 
4E63 
4C6S 


ED 
3A 
Ft 
28 


5F 
40 
t* 

*5 


38 


TIHE1 


LD 
LD 
CP 
JR 


»,R 

A,(3B40H) 

04H 

Z, BREAK 


If BREAK kay praaaad, 
axlt loop 


Program Listing.: 
an asterisk. 


Alternate instructions for Level II are marked with 


«M 


31 


it v 


START 


LD 


SP.4F00H 




4E67 


3A 


00 tt 




LD 


r.(AWn) 


Tlalng dalay 


«C*3 


3£ 


0« 




LD 


A.04M 


Turn on caaaatta 


4C6A 


18 


C1 






JR 


REAO 




«*5 


03 


n 




OUT 


ffh.a 




4E6C 


34 


40 38 


BREAK 


LC 


A,(384pH) 


wait for kay ores; 


4C07 


21 


tt 4F 


NC« 


LD 


HL , 4F00H 


Claar pulaa eountara 


4E6F 


Ff 


*1 






CP 


01 H 


If ENTER kay. 


•C0* 


06 


41 




10 


3,41m 




4E71 


28 


94 






JR 


Z.NEW 


rasuna scanning 


•4C0A 


06 


21 




LD 


B.21H 


••• Laval II 


4E73 


FE 


02 






CP 


02H 


if CLEAR kay, 


4E0C 


23 




NEW 


INC 


HL 




4E75 


20 


F5 






JR 


NZ, BREAK 




tfjto 


36 


00 




LD 


(HL).00H 




4E77 


AF 








XOR 


A 


turn off cassette 


** 


10 


F8 




DJN2 


NCM1 




4E78 


03 


rr 






OUT 


TFH.A 




4C11 


16 


rr 




LO 


o.rrH 


Bit countar la 255 


4E7A 


C3 


56 


00 




JP 


0066H 


syataa raaat 


4E13 


08 


rr 


NCK2 


IS 


A.FFH 


■alt For a pulaa 


4C70 


$\ 


FF 


03 


CRAPH 


LO 


BC.03FFH 


Claar acraan 


4E1S 


07 






RLCA 






4CS0 


11 


01 


3C 




LO 


DE.3C01H 




4E16 


30 


F8 




JR 


NC.NCN2 




4C83 


21 


it 


3C 




LO 


HL.3L00H 




4£18 


06 


D0 




LO 


B,D0H 


Tlalng dalay 


4EB6 


36 


20 






LC 


(HL).20H 




•4C18 


06 


68 




LO 


8.68H 


••• Laval II 


4E8B 


LD 


30 






LOIR 






4E1A 


1* 


FE 




DJN2 


1 




4E8A 


3t 


43 






LO 


A.43H 


Diaplay C'a 


4E1C 


JL 


0« 




LD 


A.04H 


Raaat input Flip-flop 


4CBC 


32 


C0 


3F 




LO 


(3FC0H),A 




«C1C 


03 


rr 




OUT 


FFM.A 




4£8F 


32 


E7 


3F 




LD 


(3FE7H),A 




4C20 


06 00 




LO 


8.O0H 


Tlalng dalay 


4E92 


3£ 


3C 






LD 


A.3EH 


Display >'s 


•4E20 


06 


66 




LD 


3,66m 


••• Laval II 


4E94 


32 


C9 


3F 




LD 


(3FC9H),A 




4E22 


10 


Ft 




0JN2 


1 




4E97 


32 


00 


3F 




LD 


(3F0DH),A 




4C24 


C3 


FF 




IN 


A.FFH 


novo input to carry 


4E9A 


3E 


44 






LD 


A.44H 


Diaplay D 


4E26 


07 






RLCA 






4E9C 


32 


D3 


3F 




LD 


(3FD3H),A 




4C27 


3L 


t* 




LO 


A.04H 


Raaat input Flip-flop 


4C9F 


3C 


4C 






LD 


A.4CH 


Diaplay L 


4C29 


03 


rr 




OUT 


FFM.A 




4EA1 


32 


rr 


3F 




LD 


(3FFFH),A 




4E2B 


38 


E6 




JR 


C.NCU2 


Rapaat if not a bit 


4EA4 


01 


C0 


FF 




LO 


BC.FFC0H 


Load -6 4 


at 20 


08 


rr 


REAO 


IN 


A.FFH 


Rovo Input to carry 


4EA7 


11 


02 


4F 




LD 


DE.4F02H 


Load countar pointer 


4£2F 


P 






RLCA 






4EAA 


21 


C0 


3F 




LC 


HL.3FC0H 


Load acraan pointar 


*E3* 


30 


18 




JR 


NC.READ1 


If Input la praaant. 


4EAD 


1A 






CRPH3 


LD 


*.(0£) 


If countar ■ 0, 


4€32 


3E 


t* 




LD 


A.04H 


raaat flip-flop 


4EAE 


87 








OR 


4 




4C34 


03 


rr 




OUT 


FFH.A 




4EAF 


28 


09 






JR 


Z.CHPH1 


oait ■rite loop 


4C36 


C8 


75 


READ2 


BIT 


6,L 


Long intarval7 


4EB1 


E5 








PUSH 


HL 


Sava acraan pointar 


•4E36 


CS 


6D 


READ2 


BIT 


5.L 


••• Laval II 


4E82 


09 






CRPH2 


ADD 


HL.BC 


Ralaa acraan pointar 


4C3B 


20 


12 




JR 


N2.RCAD3 


Yaai branch 


4E83 


36 


BF 






LD 


(HL).Bf H 


Diaplay ractangla 


4C3A 


2C 






INC 


L 


Not naxt countar 


4EB5 


L3 


3F 






SRL 


A 


Diviue countar by 2 


4£3B 


30 


19 




JR 


NC.TIBE3 


Through If no pulaa 


4EB7 


20 


F9 






JR 


NZ.GRPH2 


Loop if countar / 


4E3D 


34 






INC 


(HL) 


Tally pulaa 


4E39 


E1 








POP 


HL 


Rastora acraan pointar 


4E3E 


3£ 


20 




LC 


A.20H 


If it 1* a clock pulaa. 


4C9A 


13 






CRPH1 


INC 


DE 


Naxt countar 


•4C3C 


3E 


10 




LD 


A.10H 


••• Laval 11 


4C8b 


23 








INC 


HL 


Naxt bar poaltlon 


4E40 


30 






CP 


L 




4E8C 


tt 








NOP 






4C41 


30 


19 




JR 


NC.TIK2 




•4C8C 


23 








INC 


HL 


••• Laval 11 


4C43 


2E 


01 


READS 


LD 


L.01H 


go to First countar 


4EBD 


78 








LD 


A,E 


Last countar? 


4C4S 


15 






oec 





tally bit 


4EBE 


FE 


42 






CP 


42H 




4E46 


2f 


18 




JR 


NZ,T1MC1 


if bit countar la 0, 


•4EBE 


FE 


22 






CP 


22H 


••• Laval II 


AC 48 


18 


33 




JR 


GRAPH 


diaplay graph 


4CC0 


38 


C8 






JR 


C.CRPH3 


Not rapaat 


4C4A 


18 


f A 


REA01 


JR 


READ2 


Adjuat tiaing 


4EC2 


C3 07 4E 




JP 


NEW 


raai Initialise 
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displaying graphs as soon as it 
finds information on the tape. 
The first graph produced by the 
file leader has an irregular ap- 
pearance, presumably because 
CSAVE starts to write before the 
tape reaches running speed. It is 
normal for the data pulse to be 
missing in the next couple of 
graphs. 

A graph can be held on the 
screen for close inspection by 
pressing the BREAK key. The 
tape continues to move, but it 
isn't read by the program. Press 
ENTER to resume the displays, 
or press CLEAR to return to 
BASIC. The program returns to 
the address accessed by the 
RESET button. Since the Tape 
Monitor doesn't actually load 
any data, there is no need for a 
power-on reset. 

Fig. 2a shows what the 
graphs look like when the vol- 
ume is properly adjusted. The 
pulses don't overlap the mark- 
ers, and there are no stray 
pulses. As in Fig. 1, C and D 
mark the position of the clock 
and data pulses respectively. 



The clock pulses are split, with 
their first appearance shown at 
the right and the continuation 
shown at the left. It is normal for 
the portion at the right to be 
three bars wide, because of tim- 
ing irregularities in CSAVE and 
in the Tape Monitor. 

If the volume setting is too 
low, graphs like Fig. 2b will 
result. The bars at the extreme 
right indicate that pulses were 
missed, resulting in long inter- 
vals between pulses. The bar 
marked with L indicates inter- 
vals too long to graph, undoubt- 
edly caused by the loss of a 
clock pulse between two zero 
bits. 

When the volume is too high, 
the pulses spread beyond the 
markers, as shown in Fig. 2c. At 
still higher volume, the program 
may lose synchronization, re- 
sulting in a sudden deterioration 
of the graphs. Figs. 2a-c were all 
prepared from the same tape. 

Stray pulses produce a graph 
like Fig. 2d. This is a graph from 
a program recorded over anoth- 
er program and read at a volume 



much higher than I usually use. 
At lower volume the stray pulses 
don't appear. Although Radio 
Shack recommends using a bulk 
eraser on tapes before re-using 
them, I routinely write revised 
programs over the original. This 
practice has caused no difficul- 
ty at low volume. 

There is no need for the vol- 
ume to be adjusted so that the 
pulses are as narrow as possi- 
ble. Some tapes have sporadic 
episodes of missed pulses, 
unless the pulses are rather 
wide. A one-interval gap be- 
tween the pulses and the mark- 
ers should be quite sufficient. A 
lower volume is necessary only 
when stray pulses may be pre- 
sent. 

The graphs produced by the 
Level II version have 32 bar posi- 
tions, spaced out across the 
screen so that the markers have 
the same significance. As in the 
Level I version, each bar rep- 
resents an interval of 0.1 milli- 
second. 

A Level I tape monitored with 
the Level II version can be 



recognized by the absence of 
data pulses and the presence of 
a long bar over the L marker. It is 
normal to see no data bar when 
reading zeros, but in that case 
there should be no bar over the L 
marker. 

If you don't get a graph at a 
reasonably high volume, you 
may be scanning a Level II tape 
with the Level I version. To test 
for this possibility, slowly in- 
crease the volume from zero. 
This procedure should produce 
a graph if there is anything at all 
on the tape. If it is a Level II tape, 
pulses will appear over the 
markers as well as over the C 
and D markers. 

Conclusion 

Besides making it easier to 
adjust the volume, the Tape 
Monitor may be useful for other 
purposes, such as the design of 
tape input-output routines and 
the assessment of tape quality. 
Certainly, the process of read- 
ing tape seems less mysterious 
when you can see the actual in- 
put.! 



* 'SPECIAL* "SPECIAL** 

TRS-80 ADD ON DRIVES 

IMMEDIATE DELIVERY 



SINGLE SIDED $225.00 
DOUBLE SIDED $345.00 



COMPLETE SYSTEMS 
SINGLE SIDED $365.00 
DOUBLE SIDED $485.00 

INCLUDES^ 
MINI DISK DRIVE 
FUSED POWER SUPPLY 
VENTED CABINET 
CABLE 

90 DAY WARRANTY 
FACTORY ASSEMBLED 
FACTORY TESTED 

THESE ARE NEW 5" FD's 



I 



2 INTERFACE, INC ^« 

20932 CANTARA ST 
CANOGA PARK, CA 91304 
(213)341-7914 

VISA AND MASTER CHARGE ACCEPTED 




THETR 

BLUE 



Do your TRS 80'S limitations hit a sour note? Our full line of 

business-oriented software can change that tune. 

They're easy to use, modulariy designed, and superiorly 

documented, giving you versatility and sophistication of a higher 

scale, at a price you'll sing about. 

So write us, and we'll send you the score. 

SMALL BUSINESS SYSTEMS GROUP 

GROTON STREET. DUNSTABLE. MA. 01827 (617) 64*9595 
•TR&80 is a registered trade mark ot Radio Shack, a division ot Tandy Corp 
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THE "HOW TO" BOOK OF TRS-80 DATA RECOVERY 



' *&$*** 



JMJWT BOOT-UP 

UT IT! 




130 PAGES PACKED WITH 
INVALUABLE "HIDDEN" 
DETAILS OF YOUR TRS- 
80 DISK STORAGE SYSTEM. 

ACTUAL MEMORY MAPS. 
PROBLEM SAMPLES AND 
RECOVERY INSTRUC- 
TIONS. 

HOW TO RECOVER FROM 
PENCIL ERRORS. LOST 
PROGRAMS. BAD "HIT* 
AND "GAT' SECTORS. 
UNREADABLE DIRECTORY. 
HASH CODES, RECOVER 
A KILLED FILE. BAD 
PARRITY ERRORS. DIR- 
ECT STATEMENT IN FILE 
ERRORS 

AND THE LIST GOES 
ON AND ON 



UNVEIL THE MANY DISK RELATED MYSTERIES • GET IT AND USE IT! 



Presently being sold throughout the U.S. A. Canada. 
England. South Africa. Australia, the Netherlands. 
France. Germany and is being translated for sale 
in other languages. 

Countless examples, samples, solutions to disk 
problems, illustrations throughout. Samples of 
TRSDOS, VTOS. SUPERZAP, NEWDOS and 
others. 

TRS-80 Disk & Other Mysteries by H. C. Penning- 
ton has been the talk of the "Source", reviewed 
in 5 major magazines and is being excerpted in 
3! This is the book you should not boot-up 
without! 



DEALERS LOCATED 
NATIONWIDE 



IF YOUR LOCAL 
COMPUTER STORE 
DOESN'T HAVE IT 

SHOW HIM THIS 
ADVERTISEMENT 



J 



APPARAT, INC. 

3973 South Olive 
Denver. CO 80237 
(303) 758-7275 

ADVENTURE INTERNATIONAL 

1 78 Oxford Road 
Fern Park. FL 32730 
(305)339-8914 

THE SILVER SPUR 

Post Office Box 365 
Chino, CA 91710 
(714)627-9366 



PARTIAL LISTING OF PARTICIPATING IJG COMPUTER SERVICES 
H A E COMPUTRONICS 

10 Drexel Court 

Spring Valley. NY 10977 

(914)425-1535 

WESTSIDE COMPUTER SERVICES 

Mike McCartney 

1711 Franklin 

Santa Monica, CA 90404 

(213)828-2428 

MICROCOMPUTER TECH, INC. 

3304 West McArthur 
Santa Ana, CA 92704 
(714)979-9923 



GET YOUR 

COPY 

TODAY! 

JUST S22.50 

SUGGESTED LIST PRICE 

PLUS LOCAL TAXES. 

SHIPPINGS 

HANDLING FEES 



TRS-80 s a ■egis'e'eo "aJema'k c' Tardy CO'P 

RETAIL DEALERS ^^^ 

HOUSTON MICROCOMPUTER 
TECHNOLOGY 

5313 Bissonnet 
Bellaire, TX 77586 

(713)334-2991 



DC COMPUTER PRODUCTS 

596 Taylor Way, Belmont, CA 94002 
(415) 592-4222 or 24 hr. toll free 

Outside Ca (800) 824-7888 x-702 
Inside Ca (800) 852-7777 x-702 



If not available locally, write: IJG Computer Services — 569 N. Mountain — Suite B — Upland , Ca 91786 USA 
We may be contacted via "SOURCE": TCC 906 and "MICRO NET": 7000, 1 50 
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Disk- drive Extender Cables 

( >>*</ t/t< -J any *</*<((,* WAoebff 

FITS ALL MI\I IUSK DRIVES 




FULL 9 INCH 
CABLE ASSEMBLY 
THROUGHLY TESTED, 
READY TO INSTALL 



$16.95 



EACH 



SUGGESTED LIST PRICE 

PIUS LOCAL TAXES, SHIPPING 
& HANDLING FEES 




OXK SIZE 
FITS ALL 

• VISTA 

• Ml I 

• Ml( ROPOLIS 

• PERTEC 

• SHVGART 

• IM ■:.« <)M 

• AM) OTHERS 



AVAILABLE AT COMPUTER 
SUPPLIERS NATIONWIDE 



ELIMINATE DISASSEMBLY OF DRIVE 
CABINET TO INSTALL SVSTEM CABLE. 

A 34 CONDUCTOR. 21 G.i. STRANDED 
W COMPUTEN ONADE RIBBON CABLE 

m ALL OOLD PLATED CONNECTOR 
CONTACTS. THROUGHLY TESTED. 

m 9 INCH ASSEMBLY ELIMINATES 

w PINCHED, SHORTED A WORN CABLES. 

_ FITS ALL MINI-DISK DRIVE UNITS. 



THROUGHLY TESTED, READY TO INSTALL. 



END 
THE 
DAISY-CHAIN 






RETAILERS: VOLUME DISCOUNTS 
AVAILABLE) INQUIRE ON LETTERHEAD. 






■■■■ 



AVAILABLE NATIONWIDE AT 
PARTICIPATING IJG RETAIL DEALERS 

ORDER YOURS 
TODAY 

FROM ONE OF THE DEALERS LISTED 
IN THE "BOOK" AD AT LEFT PAGE. 

A PRODUCT OF IJG COMPUTER SERVICES — UPLAND, CALIF. 



END THE 

FUMBLING 

OF "ATTACHED" 

DRIVES FOREVER. 

GET ONE FOR 

EACH DRIVE 



.»/»•*«•' Sl'V/C* -14t C*B» '62 
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STYLE 



An algorithm for 

searching your data base character by character! 

Free Format Search 



Henry G. Riekers 
208 Phelps Ave. 
Glen Burnie MD 21061 



This article describes one of 
the most convenient sub- 
routines that I have written. It 
allows users of BASIC to search 
through a free-formatted data 
base to identify items of inter- 
est and to apply these items to 
a variety of tasks. Example 1 



shows only one of a wide variety 
of applications of this algo- 
rithm. 

The Algorithm 

The algorithm accepts arty 
string of alphanumerics and then 
searches through the entire 
data base, character-by-charac- 
ter, in an attempt to make a 
match. If a match is achieved, 
then the data line will be 
printed. 

The algorithm is constructed 
so that it will search through 
data lines of up to 70 charac- 



5 CLS 

19 INPUT A* 

26 X=LEN<f»> 

30 RESTORE 

40 READ W* 

43 IF W*= "2" THENPR I NT: I NPUT"CONT I NUE", P$ 

45 IF W*= ,, Z" THEN GOTO 5 

50 FOR N=l TO 70 

60 IF AS=MID*<WS, N, X> THEN 100 

70 NEXT N 

80 IF N>70 THEN 40 

100 PRINTW* 

110 GOTO 40 

1000 DATA 529. 19 PHYSICS HAUSMANN SLACK 

1005 DATA 529. 33 ELEMENTARY PHYSICS KRICHT 

1010 DATA 726. 2 ELECTRONICS WEIDNER SELLS 

9999 DATA Z 

Data Search algorithm. 



ters. If the data lines are short- 
er, then you should modify lines 
50 and 80 accordingly. If you 
are dealing with a large data 
base and matching strings of 
more than just a few charac- 
ters, you should rewrite lines 50 
and 80 such that the length "x" 



of the string is subtracted from 
70. 

In Example 1, I have con- 
structed a data base of my 
home library. The data base 
consists of a call number for 
the book, the title and the 
author. Obviously additional in- 



Example 1. Library application. 

7SLACK 

529. 19 PHYSICS HAUSMANN SLACK 

CONTINUE ? 

?PHVSICS 

529. 19 PHYSICS HAUSMANN SLACK 

529. 33 ELEMENT ARV PHYSICS KRICHT 

CONTINUE ? 

?ELECTRONICS 

726. 2 ELECTRONICS WEIDNER SELLS 

CONTINUE ? 

?ELECTRONIC 

726. 2 ELECTRONICS WEIDNER SELLS 

CONTINUE ? 

?529. 19 

529 19 PHYSICS HAUSMANN SLACK 

CONTINUE ? 

?529 

529. 19 PHYSICS HAUSMANN SLACK 

529 33 ELEMENTARY PHYSICS KRICHT 

CONTINUE ? 



94 • 80 Microcomputing, May 1980 



?PHVSICS 

529. 19 PHVSICS HflUSMflNN SLOCK 

529. 22 ELEMENTRRV PHVSICS KRICHT 

CONTINUE ? 

?PHV 

529. 19 PHVSICS HfiUSMflNN SLHCK 

529. 22 ELEMENTflRV PHVSICS KRICHT 



CONTINUE ? 

^S 

529. 19 PHVSICS HflUSMflNN SLACK 

529 22 ELEMENTflRV PHVSICS KRICHT 

726. 2 ELECTRONICS WEIDNER SELLS 



CONTINUE -> 



formation, such as a "key 
word" list, could be added. 
When the algorithm is run, a 
question mark appears at the 
top of the CRT. You then enter 
the string you are interested in 
matching. 

The first entry shows the 
author's name, SLACK, used to 
locate the book, Physics. In the 
second entry the title, Elec- 
tronics, is used to find that 
book. As a further extension of 
the second entry, the word 
Electronic (note— no "s" at the 
end) is used and still locates 
the book correctly. In the next 
entry the call number 529.19 
is used to identify the book, 
Physics. If the call number 529 



is used without the decimal 
portion, then all the 529 series 
of books will be printed out. 
Similarly, with the word PHYS- 
ICS and PHY, the same results 
can be obtained. Finally, if the 
letter S is input, then each data 
line with that letter in it will be 
printed out. 

This implementation was 
done on a TRS-80 Level II ma- 
chine. For large data bases the 
execution time can become as 
long as a minute or more, so 
don't put any more in your data 
base than absolutely necessary. 
There are several ways to make 
the algorithm more efficient, 
and I will leave that to the read- 
er's ingenuity. ■ 
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ATTENTION INVESTORS! 

COMMODITY AND STOCK 

MARKET ANALYSIS 

SOFTWARE 



THE ANALYST 

Calculates Wilder Indicators for DMI. RSI. 
Parabolic/Time Price Systems. 
Eliminates tedious calculations. 



$49. 



THE OSCILLATOR 

Filters historical data and locates 
profitable oscillators. Provides market 
entry /exit points. 
Has simulator mode 



$49. 



FOR LEVEL II 16K OR 32K DISK 

• User oriented just load program and go 
< Market tested 

• Use commercial data tiles or make your own 
j Graphic capabilities 

j Printer options 

• Clear and complete documentation 

j Monitor numerous markets in iust minutes per day 

MANAGEMENT SERVICES 

2901 CLENDENEN LANE ^213 

LONG VIEW. TX 75601 

rex. «s ado sh saies tax 



CHILDREN'S EDUCATION 

Playful Protestor Complete step-by-step tutoring 
in integer mathematics and fractions using a highly 
graphic game format A 60 room castle, intelligent 
ghost, two player option, difficulty selection, and 
ease of use have made this our most popular pro- 
gram $9 95 

Money Mailer Teaches the proper counting of 
money, both paper and coins. A miniadventure 
where rooms, creatures, and objects are repre- 
sented graphically requires the child to properly pay 
for treasures and tolls as well as count his change 
$9 95 

GUARANTEE: if not satisfied, return your order 
within two weeks for a complete refund 

Each program supplied on cassette with a booklet 
and requires 16K Level n ah orders mailed withm 2 
working days Order both for only $14 95 NC resi- 
dents please add **h tax 

~ VISA 

Med Systems Software ^ 1M 

P.O. Box 2674, Chapel Hill. NC. 27514 



— fOf> 14 HOU* INfOfiMA'lON 
fttOMI 40t-»*»-ll»J 





HOMES 

for 
TRS-80 



Custom furniture for th» 
TRS-80 off ic« or homo decor. 



Featuring 

• M.gh Qvoli'r Ccxw-rfal and Economy Modeh 

• Cmwiw ComoWi ierfSf 95 l-.n.- jia-wi S?S 5' 

• Co^l.P.TtS-IIRol.n.liS,.!.^ bvli fc 



/VE 
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AUDIO-VIDEO »•» AU1UMKVAII Mt, 

•VSTIMS ym MM. ca. Mill 

D»»'f inquiries invfed 



DU5T COVERS 

& software/hardware TRS-80 three 
piece set keyboard-tape-video 
durable black vinyl $16.95 +$2 
long video (expint) L.2 music prgm 
$4.95 tape controller with spkr/vol 
control $9.95 prgm + controller 
$13.95 all prices POSTPAID 



COnNTW PRODUCTS 
13*36 W.CEHTER DR. 
DENVER.C0. 60228 



TRS4MI is a rrRKKrcd trademark of TANDY CORP. 
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.THREE OUTSTANDING PROGRAMS^ 

PARSECTOR V the ultimate space war $19.95 

Two opponents must navigate powerful molher ship* through tho 
gataxy and capture oar sectors Launch fleet battle craft 
fyter s. cruiers. and bases Fire htgh powered enorgy beams 
or deadly short range weapon spreads To win you must conquar 
the gelaiy or destroy your opponent's mother ship. 
SPECIAL FEATURES: Unique split screen gives each player a 
private vidao display. Action Sounds and Graphics explosions. 
weapon releases, launches, end more. Variable galaxy size 
Play another parson or the computor opponent at 3 difficulty levels 
LAUNCH A COMPLETE SPACE FORCE IN MINUTES ! 



! ! ! ANTS ! ! ! A STIMULATING ACTION GAME 
Two cotontes of anta are at war Opposing queen 



$14.95 

produce 

tour types of offspring- workers, soldiers, guards, and drones 
The challenging, (trilogy it 10 produce ants in the propar sequence 
to sting tho enemy quoon or overrun it's nasi . 
SPECIAL FEATURES Full screen action with SOUND Hundreds ol 
ants battla with machev* language speed 3 gama venations 
Pay anotvjr parson or the computer opponanl »t 4 d.-tl icul ty levels 

NAME THAT STATE QUIZ educational $14.95 



A tascnetmg nay to laam about our SO slates 
shapes, names, capitals. populations, areas, and geographic regions 
Three types otquuree true t terse. mumpss chorea and till »i the 
blank SPECIAL FEATURES: Action Sounds, rewarding tone* and 
harassment buffers. Continuous score Easy to use. 

TRS 80 L2 16K required. For Sound you must hook up an 21 1 

inexpensive speaker- amp system to cassette pin. 

For program cassette* instructions sandQCCK or MONEY ORDER 

SYNERGISTIC SOLAR MC . PO Bo> S60S9S . MIAMI FL 331S6 



p* Reader Service — see page 162 
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UTILITY 



Use this AL program to backup your 500 baud 

tapes and display the contents in both ASCII and Hex. 



Backup/Display 



Craig A. Lindley 

320 IV. Alameda # 203 

Burbank CA 91506 



Have you ever had an expen- 
sive piece of software 
eaten by a hungry tape deck? 

Have you ever accidentally 
written over your most popular 
software package? 

Have you ever had a cassette 
tape develop a short dropout 
that caused the program you 
have been working with for a 
month and a half to bomb con- 
tinually? 

If your answer to any to the 
above questions is yes, then you 
know the frustrations that those 
episodes can cause. Either you 
send your damaged tape back 
to the place where you bought it, 
or you swallow your pride, dig 
deep into your pocket and pur- 
chase the same software 
package all over again. (The 
editor/assembler for $30.00 
Yek!) 

Having experienced this 
numerous times I've developed 
aruletoliveby: Never run expen- 
sive software longer than 
necessary to make a backup 
copy. From that day forth 
always run with the backup 
copy until it dies. When it does, 
just generate a new one. 

Be warned, however, that a 
program used to make backup 
tapes can also be used to pirate 
other people's software. As an 



author of software myself, I in 
no way condone this action. 
Anyone caught distributing soft- 
ware "under the table" so to 
speak, should be stopped. It is 
not fair to the people who 
worked so hard to write it. 

The Program 

The Backup-Display program 
was originally intended to make 
backup copies of any TRS-80 
Level II - 500 baud tape, in- 
cluding BASIC, source code or 
object code formats. Since then 
an additional function has been 
added to display all the data on 
a given tape on the screen 
and/or line printer in both ASCII 
and hex codes. This allows the 
tape format used in the TRS-80 
to be studied closely. 

The ASCII-hex display also 
allows one to ascertain the pro- 
gram type, the program name, 
starting address and entry 
point. Thus one can identify 
what type of tape it is without 
actually loading it. 

The results of my effort are 
shown in the listings. The 
message located at the start of 
the listing indicates that the 
program contains all the user 
prompts necessary for ease of 
operation. In other words, the 
program contains quite a few 
bells and whistles for those of 
us who like that sort of thing. 

For convenience, the program 
also includes a menu of se- 
lectable options, line printer out- 
put for the memory dump and a 
built-in leader delay to jump over 
any tape leader when making a 



copy or separate multiple 
copies on the same tape. 

Using the Program 

SYSTEM loads the object 
tape. Type BACKUP at the first 
asterisk prompt. After loading, 
type a / [enter] to execute. 

After the initial messages, the 
computer will wait for you to 
load the tape you want copied or 
examined. Put the tape into the 
cassette deck and press enter. 
The double asterisks will appear 
in the upper right hand corner of 
the screen and will blink (quite 
irregularly) as the tape is being 
copied into memory. When the 
tape is completely loaded in, the 
program will then display the 
menu of all the selectable op- 
tions and await a response. 
Your choices are: 

R- RETURN TO BASIC 

M — LOAD NEW MASTER TAPE 

C— MAKE ANOTHER COPY 

S— SYMBOLIC TAPE DUMP 

If any other choices are made 
than the ones listed, the menu 
will be repeated. 

R returns the computer to 
BASIC just as if you turned the 
power on. M repeats the se- 
quence of events just completed 
as if starting the program over. 

C clears the screen and 
displays the message "When 
the tape is ready, press enter." 
This is your cue to record. (It is 
not necessary to run the tape 
past the leader as the program 
will do that for you.) When you 
press the enter key again, the 
tape copy will be made and then 



return to the menu. If you want 
another copy of the same 
cassette, select C again and 
follow the same procedure. 
You'll notice that as the tape is 
being recorded a single asterisk 
will flash in the right hand cor- 
ner of the screen to indicate that 
a recording is being made. 

The last selection on the 
menu is S, or symbolic memory 
dump. This displays on the 
screen the contents of the 
master tape just loaded in both 
ASCII and hex formats. (The 
printable ASCII characters are 
2iH-*7eH. Non printable char- 
acters are printed as blanks.) 

If a printer is on-line, each 
complete screen (128 bytes) of 
data will be listed just as it ap- 
pears on the screen. After each 
complete screen of data is writ- 
ten, the user has two choices, 
either hit any key (other than 
Break) to display the next 128 
bytes of data or hit the Break 
key to return to the menu. After 
the last data is written on the 
screen, hitting any key will 
return you to the menu. At this 
time all of the options are again 
available. 

Hints for Using the Backup/Dis- 
play Program 

When loading the backup 
copy into the TRS-80 using 
either the SYSTEM command 
for object tapes or CLOAD for 
BASIC tapes, use the same pro- 
cedure as you would in loading 
the original. The copy is exactly 
the same as the original in every 
way including the program 
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The Atlanta ComputerFestival 

June 21-22, 1980 

Downtown Atlanta Marriott Hotel 

• Held in conjunction with the famous Atlanta HamFestival! 

• 140 exhibitor booths devoted to Ham Radio and Microcomputing with special 
emphasis on the Radio Shack TRS-80! 

• Door Prizes include a 16K Level II System! 

• Multi-level covered Fleamarket/Swapshop! 

• Forums & meetings on a variety of topics! 

• Parking for thousands of cards with complimentary shuttle bus to/from the 
Atlanta Civic Center lot! 

Registration: $3 in advance, $4 at the door, children fee! 

Write for a pre-registration packet to: 

Atlanta ComputerFestival ^ 
PO Box 45183 
Atlanta, GA 30320 

DON'T MISS THIS OPPORTUNITY! 



$29 



00 

111 1,000 
PAID ORDERS 
PER PACKAGE 

ALL FOUR *99°° 

SOPHISTICATED 

ACCOUNTING 

SOFTWARE 

OSBORNE & ASSOC. 

CBASIC, G/L, P/R, AR, AP 

(4 pkgs) 

CONVERSION — TRS-80 

East Coast Office 
(703) 573-7300 

West Coast Office 
(801) 225-0497 



FULL SERVICE 

ACCOUNTING & PROCESSING 

5423 Crows Nest Ct. 

Fairfax, VA 22030 
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M/C • VISA 

'Regular price $49/$196 
Media & Manual Separate 




• Registered Trademark of Tandy Corp. 

P.O. Box 148, Spring Valley, California 92077 (714) 460-4975 



^ Reader Service — see page 162 
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i flSDII- U B fi C K U F ( J C 

HEX- 55 42 41 43 4B 55 56 3C S6 88 4fi 43 4F 58 59 52 

2 F6CII- I 3 H T i 3 ? 3 - - C L C K Ddf 

HEX- 49 47 43 54 28 31 39 27 39 ^ 2T' 43 4C 4F 43 4E; 

3 ASCII- H G R K 5 S F I W ft R £ - - HIT 

HEX- 57 4F 52 4B 53 28 53 4F 46 54 57 41 52 45 2D 2P 

4 ASCII- T ft P E B ft C K U P / D I S fW 

f€X- 88 54 41 58 45 20 42 41 43 46 55 58 2f 44 49 53 

5 ASCII- P L ft V F R G R fl N B V KEY 

r£X- 58 C 41 59 28 58 52' 4F 47 52 41 40 28 42 59 28 

6 ASCII- C . L I N D L E V THIS TO 

SX- 43 2E 28 C 49 4E 44 4C 45 59 98 54 48 49 53 28 

7 ASCII- P R G R fl H HILL COP flDV' 

HEX- 58 52 4F 47 52 41 4D 28 57 49 4C € 28 43 4F 58 

8 ASCII- V ft N V 5 8 8 B ft U D T 

HEX- 59 28 41 € 59 28 35 38 38 28 42 41 55 44 28 54 

Program Listing 2: An example of the first and last block of Backup/Display program, exactly like screen display. 



i HSCII- 


N 


L 






M 


3 N 


X 




TffE 


HEX- CF 


4C jTi 


15 C 


18 CD 


CD 3D 


€-C3 


33 4£ 9i> 


78 


Cfl 




2 ASCII- n 


















m 


HEX- 4D 




















3ASCII- 


















HIT 


HEX- 




















4ASCII- 


















fuv 


HEX- 




















5ASCII- 


















*!• 


m- 




















6 fBCII- 


















T n 


hf> 




















7 ASCII- 


















ftDV 


HEX- 




















8 ASCII- 




















hex- 





















name. The tape copy produced 
by this program is no better than 
the data it received. There is no 
error checking in this program 
whatsoever. If a bad load occurs 
from the original tape, the 
backup copy will be bad also. 

When using this backup pro- 
gram it is necessary that the 
cassette you are copying have a 
short blank section (=1.5s) im- 
mediately following the pro- 
gram on the tape. This blank 
area allows the backup program 
to correctly interpret the end of 
the tape you are trying to copy. If 
this blank area is missing, the 
program will consider any 
following data as valid and ap- 
pend it to the program you are 
trying to backup. This is of no 
consequence however, as the 
computer will read in only the 
backup copy and stop, ignoring 
all that additional garbage ap- 



pended to the end of the tape. 

Also, certain machine 
language tapes have a small 
loader at the beginning followed 
by the main program text. Each 
of these segments must be 
treated as individual programs 
and copied one after another on 
the same cassette. 

An object code copy of this 
program can be had in one of 
two ways. The listing can be 
copied into the computer using 
the editor/assembler package 
and an assembly can be done, 
or the Backup/Display program 
can be purchased from Clock- 
works Software 320 W. 
Alameda, #203, Burbank, CA., 
91506 for $12.96. 1 hope the pro- 
gram will save you one hundred 
times that amount in frustration 
and lost time, while allowing vou 
to become more familiar with 
your TRS-80 tape format. ■ 





Program Listing 1 


*m 


m&i ORG 


4BMH 




Mill •mwniSPW M®m 


882S 


89129 IHPUT EBU 


m 


MD 


&9i38CR E8u 


**■ 


NH 


mm BBK EQU 


91H 


6028 


98158 S&T EQU 


,PRINTED IN PUCE OF HOWRHT RSCII 


m 


m» KM EQU 


9CDH ;OK IM FOR REC. HO PfiUC 




99179 BftSIC EQU 


AAAAU 

■mm 


37E8 


99199 LPRNT EQU 


37E8H ; LI* PRINTS? ST9TUS-09T9 PORT 



an 43 eeiseocs offH wmu m-asmm sofuhe-' 

4981 4f 4992 59 4993 59 4994 52 4995 49 4996 47 

4967 48 4988 54 4999 29 4999 21 4998 39 499C 3 

7 498D 39 498E 2D 499F 2D 4918 43 4RU 4C 49 
12 4f 4913 43 4914 49 4915 5' 4916 4F 4917 52 

4913 48 4ftlS 53 4Mfl 28 491B 53 491C 4F 491D 46 

491E54 491F57 4R28 41 492152 4922 45 4923 
2D 4924 25) 4925 99 98288 D€FE 98H 

4926 54 98218 ICS1 DEFM 'TAPE BflCKUP/WSPIJV mm BV C. LINftEV 

4927 41 4R28 58 492S 45 4929 28 4328 42 4fi2C 41 
492D 43 492E 48 492F 55 4938 59 4931 2F 4932 4 

4 4932 49 4934 52 4935 58 4926 « 4927 41 4fi 

38 59 4939 28 4939 58 4938 52 493C 4f 493D 4? 

493E52 403F41 4948 40 494128 4942 42 4943 59 

4944 28 4945 43 4fl46 2E 4947 28 4948 4C 4949 

49 4949 € 4948 44 494C 4C 484D 45 494E 59 

494F88 98228 DEFB 88H 

4958 54 88238 IB2 DtF« 'THIS FSfHWI HILL COPV W 588 B»X TffE' 

4951 48 4852 49 4fi5353 495428 495558 495652 

485? 4F 4958 4? 4KB 52 4959 41 495B fl 4R5C 2 

8 495D57 495E49 485F4C 4868 C 496128 48 
62 42 4RB4F 496458 4fl65 59 496628 496741 

4A684E 4969 59 496928 4868 35 496C38 4ftSD 38 

496E 28 496F 42 4978 41 4971 55 4972 44 4973 

26 4974 54 4975 41 4976 58 4977 45 4978 99 
88248 DEFB 88H 

4979 57 88259 IES3 DEFH 'i#€N DC T flPE IS REflW, PRESS ENTER' 

4979 48 497S 45 4fi?C 4E 497T,' 28 497E 54 497F 48 

4988 45 498128 4962 54 4flS3 41 4984 58 4ft35 4 

88 45 498C41 flD 44 498E 59 498F 2C 4998 20 

499158 4992 5.2 4«2 45 4934 53 4995 53 4996 28 

499? 45 4998 4E 4999 54 4999 45 4998 52 48C 

88 88268 DEFB 8£* 

4fl9D 43 m^ IE4 D0* 'COMPLETE WE COPIED INTO ©Of 
4F0E 4F m 40 4998 58 4991 C 4992 45 4993 54 

4994 45 4995 28 49R6 54 499? 41 4998 53 4AA9 4 
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Medoffice 



TM 



The Mutt* «»( the art in small vv>truu nuilu .il oflfet 
f>riitfraim. I'ascul sofhvmr fiir'thf I K.s 80*i POP 11 , 
and mam othrrv 

i (I i in' ill< .il «-i ttu .in- *pi\ i.il >i- 

PATIENT CARE DATA SYSTEMS 

418 North Mam Si. rVnn lfcri irk 14577 
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SOFTWARE 
FOR THE TRS-80* 




16K. AND CAN BE PLAYED 



NOW! 

A LIGHT PEN 

FOR THE TRS-80 

AND 

SOFTWARE 

THAT USES IT! 



QS LIGHT PEN. We have taken tie exce'lent Photopomt" light pen and packaged it with our own 
custom software Use the light pen to draw on the video screen, make multiple choice selections, 
or add zip to your game programs You get the light pen. which plugs into your tape recorder, and 
an instruction booklet that includes the software you need to interface to your own BASIC pro- 
grams Our software routines are in BASIC anO a simple GOSUB puts the light pen in action. These 
routines include a "menu selection ' routine and a screen location" routine Two BASIC pro- 
grams that demonstrate t^ese routines are also included One 9V battery required, not included 

Light Pen - $19.95 

SKETCH-80" by Bob Christiansen Use the QS light pen to draw figures on the TRS-80 video 
screen Figures are drawn at three times norma size Then save your sketch in memory and start 
another one Your sketch car be displayed at normal size or at the enlarged size at which they 
were drawn Combine two or more sketcr-es on the same screen Ask the computer to print out 
the POKE values required to produce your sketch using BASIC Save your sketches on diskette 
This system program figures out how mucti memory your TRS-80 has and allocates storage 
accordingly Requires leve' 'I 16K On Cassptte — $14.95 

THE FOLLOWING PROGRAMS REQUIRE LEVEL 

WITH OR WITHOUT A LIGHT PEN 

POKER PETE'' by Oave Gubser Play live i ard 

draw pokpr one on one against an animated 

PETE Watch PETE shuffle and deal the cards 

He will challenge you with bluffs, raise 1 rails 

and folds in this winner take all showdown 

And watch out PETE'S got a gun 1 Three 

levels of skill Written in BASIC 

On Cassette - $11.95 

LOWBALL POKER by Danny Shea How low ran you go' Its you against Micro Molly and the 
lowest hand wins That's the rule m lowbali poker This version plays the popular Gardena. 
California rules Don't tane her 'or granted Mo ly plavb an excellent game Written m BASIC 

On Cassette - $11.95 

RUMMY MASTER by Dave Gubser Play rummy against the computer Exceptional graphics 
display your hand the discards, and the cards that have been melded You see your opponent 
shuffle and deai out the cards Tested man arcade this program was a big hit Written m BASIC 

On Cassette - $11.95 

MATCH CARDS by Danny Shea. BANKSHOT Oy Bob Christiansen Two programs on one cassette 
MATCH CARDS is a concentration-type game where you match numbers, letters, or graphic 
shapes for 1 or 2 players Automatic scoring rates your recall ability. Written in BASIC. 
BANKSHOT is a billiard like game for those who think they know a>l the angles Hit the ball into 
the pocket, but you must hit a wall first Written in BASIC with machine language subroutines 
Just ClOAD and RUN For 1 or ? players On Cassette — $9.95 

THE FOLLOWING PROGRAMS REQUIRE LEVEL II. 16K. AND DO NOT USE A 
LIGHT PEN. 

FASTGAMMON" by Bob Christiansen Our popular machine language backgammon game that 
started us in business The computer piays against you and makes Rood moves instantaneously. 
Option to replay dice rolls from the previous game An eight-page instruction booklet is included. 

On Cassette — $19.95 
On Diskette - $24.95 

DEBUG by Bob P erce Debug machine language progiams by stepping through one Z 80 in- 
struction at a time Relocatable Several display options Multiple break points Modify memory 
and registers On Cassette — $14.95 

Z-80 DISASSEMBLER by Vic Tolomei. Decode machine language programs, including TRS-80 
ROM with this Z-80 Disassembler written in BASIC Instruction mode prints out machine code 
and Zilog mnemonics in standard format Or use the ASCII mode which converts machine 
language code to ASCII On Cassette - $14.95 
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QUflLrry softwtir€ 

6660 Reseda Blvd . Suite 105. Reseda. CA 91335 
Telephone 24 hrs . 7 days a week (213) 344-6599 

HOW TO ORDER: MasterCharge and Visa cardholders may telephone their orders and we will 
deduct $1 from orders over $19 lo compensate for phone charges. Or mail your order to the 
address above. California residents add 6" sales tax. Shipping Charges: Within North America 
orders must include $1 50 for first class shipping and handling. Outside North America the 
charge tor airmail shipping and handling is $5 00 — payable in US currency 

• TRS-80' is a 'edified IradPTiark ul Tandy Corp 
'Photopoml -ias been uMnntikpA 6t Micro Malm 
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SSSSAVESSS 
TRS-80*/ZENITH/APPLE/ MATTEL 
ATARI COMPATIBLE HARDWARE 



m^ DISK DRIVES 

^^_ More capacity than Radio ShacK 35 Track (80 K 

Bytes) drives. Fully assembled and tested. 

Ready to plug-in and run the moment you 

receive it. Can be intermixed with each other 

and Radio Shack drive on same cable. TRS-80* 

R^** compatible silver enclosure 

90 DAY WARRANTY. ONE YEAR ON POWER SUPPLY. 

FOR TRS-80* 

CCI-100 5% ",40 Track (102K Bytes) for Model I $314 

CCI-200 5V4" 77 Track (197K Bytes) for Model I $549 

CCI-800 8" Drive for Model II (V, Meg Bytes) $795 

For Zenith Z89 

CCI-189 5%" 40 Track (102K Bytes) add-on drive $394 

Z-87 Dual 5 V*" add-on drive system $1095 

DISKETTES— Box of 10(5 '/•")- with plastic library case $24.95 



16K MEMORY UPGRADE KITS 

for TRS-80*. Apple II. Sorcerer (specify) 
PRINTERS NEC Spinwriter 



$59.95 




Letter Quality High Speed Printer 

Includes TRS-80* interface software, quick 
change print fonts. 55 cps. bidirectional, 
high resolution plotting, graphing, propor- 
tional spacing $2479 
With Tractor Feed $2679 
779 CENTRONICS TRACTOR FEED PRINTER $995 

Same as Radio Shack line printer 
737 CENTRONICS FRICTION & PIN FEED PRINTER $849 

Text quality matrix , proportional spacing 
730 CENTRONICS FRICTION & PIN FEED PRINTER $640 

7x7 matrix 
P1 CENTRONICS PRINTER $349 

Same as Radio Shack quick printer 
PAPER TIGER (IP440) $995 

Includes 2K buffer and graphics option 
TI-810 $1599 

Upper and lower case, parallel and serial, paper 
tray and TRS-80* interface software 
OKIDATA Microline 80 Friction and pin feed $645 

Tractor Feed, friction, and pin feed $745 

EATON LRC 7000 + 64 columns, plain paper $349 

COMPLETE SYSTEMS 

TRS-80* LEVEL II-16K with keypad 

TRS-80* Expansion Interface 

ZENITH Z89 all-in-one computer 

ZENITH Z19 

ATARI 400 $549 ATARI 800 $999 

MATTEL INTELLIVISION 

DISK OPERATING SYSTEMS 

PATCHPAK #4 by Percom Oata 

CP/M for Model I, Zenith 
CP/M for Model II, Altos 

NEWDOS Plus — with over 200 modifications 35 Track 
and corrections to TRS-DOS 40 Track 



$722 

$274 

$2295 

$740 

$299 



$ 8.95 
$145.00 
$245.00 
$ 89.00 
$ 99.00 



CAT MODEM Originate and answer same as 
Radio Shack Telephone Interface II 



$157.50 



The CPU SHOP 

TO ORDER CALL TOLL FREE 1-800-343-6522 

Massachusetts residents call (617)242-3361 

5 Dexter Row, IDept. M5,Charlestown, MA 02129 

Hours: 10AM-6PM (EST) M-F(Sat. till 5) 

Massachusetts residents add 5% sales tax 

Freight collect, F.O.B. Charlestown 

'TRS-80 is a trademark of Tandy Corporation VISA 

Prices subject to change without notice. 
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^ Reader Service - see page 162 
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INTEGRATED 
EYPLUS UTILITY 

PACKAGE 



Keyplus it a collection of utilities that can be enabled dr 
trom'thc keyboard of a Le*d ll IRS 80. Seven different keyboard 
entry mode* include BASIC shorthand (2 modes), direct graphic 
character input {? modes), typewriter style input and standard 
IKS-BOentry 

Kcyplus support) auio-repeai. lowercase video (optional hard- 
ware modification required). restoration of lost programs, key- 
board debounce, single key stroke user del inable strings and more! 

Designed iw cave «»f u*c. Kcyplus routines may be enabled or 
disenabled in two key strokes. 

The level II version ol Keypluv is available fa 114.95 and a more 
powerful disk version (32 or 48Kl hHIs tor $19 95 Pennsylvania 
residents add 6°'o sales tax. 

TRS-W is a registered trademark of TANDY CORP. 
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SJW, INC. 

P.O. BOX 438 

HUNTINGDON VALLEY, 

PA 19006 

215-947-2057 
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H 371-1660 



NEC Model 3315 spinwriter 

lor the NEW TRS-80 word processing aoltware 
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i i - '' (actor or W/1 10 tectari 

u i 440 



■ PSON TX-80 DOT MATRIX PRINTER 

64 Graphic characters 7 5 dot ma' 
(7 6 in grapntc) double width charac 
tars. TRACTOR and FRICTION feed 
models with interface and cable for. 
PET. APPLE. RS232 available at 
OUR low prices 

Ml SIFTWAIE: MICROSOFT AOVENTjPE - The JOpMsticatad fanU$»/l0OJ*C 
fame . . . Our lew pr>ct W 

f ILE HA* A Q Ell EH T SYSTEM — The prefesjioaal data base 
soflwere ay I** business software canpany 120 
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I tu TRSao APPLE ll. PCT ZENITH a-xJolWcori«Julera 
aatofO «'««» psontocMrt*' S6S.00 
Prices aafcject to etaeee wtthoul awocc. di,™.ioii\171 iccn 

IER CXAftSE WELCOME. Allow 2 Pho ne (213' 371 -1660 

weeks let catlne* check to clear. 4 weeks lor f | A/llf^Dr"! 

aenoitl chert* Add IS far shipping and hand- (a) § J /VMVaMtW 
imp. cakr. rttwtfitt a*i 6% saw tax. (Sony, f J fc-J BUSINESS WOR ' 
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€& 18EC 


81*60 


JR 


-: : 




€31 8E8D 


81478 DCa 


u) 


CCR 




CO P844C 


81488 


Q1.L 


pRTiWS 




4C36 CD84€ 


81498 


Oil 


.PRTDVR 






81588 


POP 


BT 




4C3H El 


81518 


(V^Ti 


ft 




€38 C9 


81528 


PFT 






4C3C CDF94C 


ch^a n,T£^ 


i3fti 


aiTPUT 




4C3F 211MB 


81548 


LD 


MbflESlB 




4C42 CDB84D 


81558 


CML 


P : ;'•. 




4C45 2fE843 


81568 


lD 


HL v4828i- ) 




4C48 89 


81578 


m 


HL BC 




4C49 222848 


J' --:; 3 


LD 


(4820H) ! HL 




4C4C C3 


81598 


RFJ 






€40 OEM 


81688 ENTER! 


CflLL 


MM 




€58CDfi7€ 


81618 


CflLL 


L'CR 




4C5? 212546 


81623 


Hi 


HLHESii 




€56CDB34D 


81638 


CflLL 


BLKH 




€59 CDP74C 


81648 


CflLL 


LFCR 




4C-5C 3C 


81658 


HE 


fi 




4i ..~:0 1 : 1 


81668 


RET 






4C5E CMD4C 


81678 FSiTLRf 


CBLL 


ENTER2 




4C61 C03C4C 


61638 


CSi 


ENTER! 




4C64 O 


81698 


RET 






4C65 80386 


81788 M 


1 r\ 


BC/33H ;piiTS 


RSCII-fCX BOEDER OP 


4C68 21883C 


81719 


L« 


HL3^BH 


;FDV *ESS6E ONSCREEN 


€68 222848 


81728 


LD 


s402eH) ; ft 




4C6E 301 


81738 


LD 


Rj.iiH 




€78 CP3C4C 


81748 


CftLL 


ENTER1 




€73 212E4B 


81758 


LD 


HL: i€':12 




4C76 CD5E€ 


81760 


C8LL 


ENTERS 




4f^q 213348 


81778 


LD 


KL RESO 




€7C CD5E4C 


81788 


CflLL 


EiiTEfR 




Cff 213848 


81798 


LD 


HL/ HES14 




4C82 fM€ 


01888 


OIL 


ENTERS 




4CS5 20C46 


eisie 


LC' 


HLSES15 




4C88 GDQE4C 


81828 


CALL 


ENTERS 




€86 21484B 


m c '^ 


; fj 


u SiCC" t 




4C8E CD5E4C 


81848 


"i: 


ENTERB 




4C91 2I444B 


81858 


i - 


HL HESi? 
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- >- ::>;; 


-Jii'k' 


"- 


-.--.- 


4C9? 2i*7*S 


WCT 


:. 


HLKES18 


-i.™ YrlK 


"' i-V 


:-.. 


r,-:-r 


-.y. ~y*. 


5l:?8 


:-_. 


LFCR 


¥M 21258 


;IrS 


:. 


rLKSii 


iSilMM) 


*_-!* 


\K. 


:.-.. 


4CR6 


dm 


'•■- 




ttfl?F5 


81338 LFCP 


■'.:- 


flF .I* FEEK*F«£t ETuW 


Cffi 3E8C' 


B1948 


:. 


ftCP. 


4C* EDfSC 


81358 


:=l. 


OUTPUT 


4GAD Fi 


81368 


■■? 


flF ' 


4u£C5 


81378 


a' 




4CBF C3 


81388 i8e 


PISH 


BC ,PRWfS a SWC£ T HtN 2 €X 8f 


4f.68 F5 


8L*« 


PUSH 


RF 


4C81 fe*S82 


82886 


lD 


3-92H 


4C63 4F 


82818 


LP 


C.fl 


4CB4 3£28 


8282? 


LD 


fl, ' ' 


4C86 CDF94C 


82838 


XL 


OUTPUT 


4C89 79 


828W 


J- 


ftC 


4U* * 


82858 


:i :~ 




4C86 8f 


82%e 


RKA 




CKff 


12678 


«•:- 




<ca* 


1MB 


m* 




4C8EES8F 


ece^e nan 


AND 


8FH 


4CC*0CC* 


82188 


?L. 


UUP 


4CC3 Of ?*C 


82118 


X. 


OUTPUT 


4CC6 79 


82128 


LD 


-•: 


4.X? 18F5 


82138 


:js: 


AGIN 


4CC9F1 


82148 


pop 


ff 


4CC8C1 


82158 


a-f 


BC 


4CCBC9 


82168 


RET 




4CCC E5 


82178 LKUP 


FUSH 


HL ; LOOKS If ASCII VflLUE OF OK 


4f.CE' 216B4B 


82188 


LP 


HL TABLE 


4CW85 


82138 


no 


HL 


4CW6F 


82288 


LD 


LA 


4CD2 7E 


82218 


LP 


ft(HD 


4CD3E1 


82228 


PDF 


n 


4CWCS 


82238 


RET 




4CW CS 


82248 HHSC 


PUSH 


bc ,*:tes 2 spaces no no FCC 


4CWF5 


82258 


: '.":'•' 


if 


«W 4? 


8223 


LD 


u 


4CW3E2I 


82278 


.: 


ft' ' 


4CW (Xf 94C 


82288 


>.. 


OUTPUT 


CM 3E28 


822* 


.! 


ft ' ' 


4CCFOf5C 


823*8 


>.. 


JUTPj' 


4Ct2 78 


82318 


.. 


R.8 


4CF-2D628 


8232V 


3* 


28* 


4CE5 FtfSC 


62338 


|p 


RrlfMT 


4L-E8 78 


82348 


LD 


ft g 


«E9 BSE 


32350 


SUB 


TEH 


4CEB F2F54C 


82368 


JP 


C .NPNT 


4CEE78 


82278 


_; 


=.E 


4CEF CtjFX 


82388 BE 


:.- . 


OUTPUT 


-:-: :: 


82488 


: : ; 


:; 


40*4 0? 


82418 


: i" 




4CF5 3E28 


82428 VNT 


,: 


ftStfiST 


4CF7 18F6 


82438 


J5? 


BK 


4-2KSD5 


82448 OUTPUT 


PUSH 


DE ;*ITE5R AT CttSOS POSITION 


4CFfi Ff€5 


82458 


FtfK 


IV 


41KCO& 


824*8 


X_ 


33H 


4CFF fttl 


82478 


POP 


IV 


4W1D1 


82488 


pop 


DE 



This Weekend: 

STIK 

IT.... 
••to your 



That's right' Esmark's VIDIET-STIK light pen has the TRS-80 CONNECTION 
for LEVEL- 1 & II Your 4K to 48K TRS-80 System will come alive under your 
VIDIET-STIK within minutes of its arrival That's because thereare no wires to 
solder or traces to cut. You're up and running as fast as you can plug the 
interlace into your system's cassette EAR-|ack. CLOAD our custom LIGHT- 
WAVE demonstration software and RUN And because the interface has a 
plug for your recorder, you won't have to unplug it again when loading your 
other software tapes The interlace allows them to pass right thru whenever 
you're not using the pen it s exclusive switched tip design means the pen s 
electrically isolated from your system when it's not en use Just point & press 1 
It's that simple Plug. CLOAD and RUN Andhave we got the software for you 
to RUN with 1 Our demonstration tape includes a calibration program lusedto 
ad|ust the CRT s brightness and contrast! plus STIK-TAC-TOE AWARI and 
TOWERS Two chaiiangmg games and a puzzle that will keep grownups anc 
Children Slik'mg it to your TRS-80 for hours And there are instructions 
provided so you can begin writing your own light pen programs fiigntwarei 
for fun or profit (Level II) Or. just Sit back and en|Oy Our LIGHT-WAVE tapes 
each month Esmark S unmatched commitment to lightware can bring you up 
to five new games puzzles, drills & educational quizes or simulations eaci 

month Our current LIGHT-WAVE releases are 



LIGHT-PAK2 - LIGHTPEG (4 peg-|ump puzzlesi 
ENDRUN (Othello with a twist ) 

(LEVEL II) LIFE9 (Conway s LIFE with mutations) 

Price. $19 95 (including postage 4 handling) 

LIGHT-PAK3 - LITEGAMMON (Backgammon you II Stik with) 

(LEVEL II) STIKWUMPUS (Caves with a little lite ) 

MAZEMASTER (Maze after maze to poke thru) 



Order yours now and we'll include a free copy of FLASHBACK. Esmark's 
newsletter dedicated to the latest news in lightware applications And. don't 
forget to tell your friends The VIDIET-STIK can also be ordered for use on 
most other micro systems using the following processor chips: 



T 

R 

S 
t 

8 
O 



8080 



Z80 



6800 



6502 



All that's required is a standard cassette iack leading to Ground and a 
readable single bit input port Driver software is provided along with 
instructions for writing lightware applications And tell your local Dealer that 
Esmark's got a Dealer package he won t want to miss out on Delivery is 3 to 6 
weeks from receipt of your order C O D s are $3 00 extra but will be shipped 
within two weeks All prices are FOB Mishawaka Indiana Indiana residents 
add 4% state sales tax 



ALSO COMING FROM ESMARK 

[ I TRS-80 Printer Interface (Cassette AUX-|ack interface for all RS232 
printers Includes LLIST&LPRINT software) 

( ] TRS-80 RS232 Communications Interface (Makes your TRS-80 a full 
I/O terminal to timesharing systems the world over Gives you 
intelligent or dumb terminal capabilities at 110 or 300 BAUD Also 
includes Printer Interface above with 20 mA current loop & TTL level 
I/O options.) 

— TRS-80 is a trademark of the Tandy Corporation — 



INCORPORATEC 

507V* E. McKINLEY HWY. MISHAWAKA. IN 46544 
(219) 255-3035 

- $62.95 

PLUS $1.50 
•ELECTRONIC SYSTEMS MARKETING POSTAGE & 

HANDLING 
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APET 




EVERYTHING YOU NEED 
TO BRING YOUR BASIC 
PROGRAMS TO UFE WITH 
SOUND! 

SOUNDWARF. »a.i i.- 1 ■ i. 
Y(Hl GO A SPtAKhKAMPLI- 

nrRi.'NiT ■•! i .1 i i .tiois 

r i |nr >Oidffr.ng. Jj«pljg:n' 

YfH ) GFT A DEMO PKOdKAM wit. 
• variety ol umpic loand effect* - 

iwt sounds tunes? 

YOU GfcT A COMPOSER PRO- 
t»RAM •• m re ywtjr our 

original sou rvdefkcu I an for all ages' 

YOU (.M AN INSTRUCTION 
U(X)KLET ihai i«| you Sow lo town 
sound nto /our prosjram*. 1 vwt 
Aarraniy 




I 

AlI.PFTSATI l 

Compucolorl 



SI Nl i r ( )R FREE CATALOG OF 
(kAMI SFORPfTACOMPUCOLORI 



SEE Y« * -AY Or order drect from CAP by of , 

mail O .'(Charge orders include expiration dale Add $1 

postage & handling per order (3 for air or COD Arizona retidenls 
add lax 

I ' '(**oi«dl r, Sun.-? !i»»«i »/ 




T3U-80 

^S SOFTWARE 



•CANNED SOFTWARE I. 



■ark of BCC. 



Yes! Quality Software for the TRS-80 is now 
written & available. BCC is pleased to be able to 
present some very fine software now with even 
more available in the very near future. Also we 
develop custom designed software for your 
every need. Write us for a FREE price quote. 

tTKS-BO i» a trade mark of [ht Radio Shack Dlv. of Tandy Corp. 

vO^ For Software Think BCC <=z& 

O MdH B3S© 80 HOD I (Requires IRK ). i drives) S69.95 

MOD IKRequlres 48K '■ I driveslS W9.9i 

A RANDOM ACCESS program w 

have outstanding bills a 

o Oil Delivery _mod 



nlliaited number ol entries. Pk 
er . Tndsy, list all people who 
in rip-code order. EXCELLENT!! 



fo 



he 80s 



drives) 
ryrhing 



for prlr. quote, 
f heating industry. 



o Vendor mod i uequir 

This program keeps track nf a 
direct access of coded lnfor. 
various other fields. 



48K l. 2 drives! S39.95 

nlimited number (*i50 per disk) nf vendor 

on bv vendor number, 6 also permits acre 



For Supplies Think BCC 



o Disks & Tapes . 

8 Inch diskettes 1m Bran 



i\ Inch diskettes 3M Brand 519.95 UO in plas. case) 

and S64.95 (Box nf 10) SV'Verbatlm S39.95 (Box of 10) 

Cassettes Very High Quality S16/do« C20's. ADD 'n STAC stackable cassette 

holders. Each holds 8 caasettes. S3.t9ea 



O rTWlterS The fabulous BASE i PRINTER 9b char ASCII with Tractor Feed (. 2K 
Buffer. This printer just can't be beat!!! S649.00 (2 for SHOO. 00) 
RECONDITIONED CENTRONICS I02A (310 chars/sec ! ! ! ) SI500.00 



; Master Charge Bap. Dale. 
: : Visa. Signature _ 



ORDER NOW! All programs come on quality cassettes. Programs are available on diskette for an 

additional charge of S7.00 per order. NYS residents add 7%. Cheek boxes of items being ordered; 

« of items ordered Total amount enclosed I All items must be prepaid) 

Bourrut Consulting Corporation ^ 57 

k eiFrksndkjfld. Srwthtcxun. av. 11787 



4082 C9 


82498 


iF 




4003 C5 


82589 BLflf* 


PUSH 


EC ,JHfS OUR TfffE HERDER 


4C04E5 


82518 


PUSH 


HL ifliO PUTS SPflCE BET. COPVS 


4095 F5 


82528 


PUSH 


flF 


4086 86% 


82538 


LD 


6-6BH 


4088 218689 


82548 16 


i r. 


It 8989, i 


4086 26 


82558 L5 


DEC 


HL 


408C7C 


82568 


LD 


ft.H 


4080 B5 


82578 


OR 


L 


40tJE26F6 


82588 


JR 


NZL5 


4018 18F6 


82598 


DJN2 


L6 


4012 Fi 


82688 


POP 


Ff 


4013 El 


82618 


POP 


n 


4014 CI 


82628 


POP 


BC 


4015 C? 


82638 


RET 




4D16 3fl3F3C 


82648 BLINK 


LD 


fL C3C3FH>i BUNKS * WEN LOflDINB 1 


4019 FI8R 


82658 


m 


9m 


4U8 323F3C 


82668 


LD 


C3C3FH),fi 1 


401EC9 


82678 


m 




4C1F 05 


82688 KBIN 


PUSH 


C€ 


4028 asm 


82696 


cm 


INPUT iRETllWS ON ffiVBOrTO INPUT 


«& 67 


32788 


OF 


ft : INPUT CHRR IN fi REGISTER 


4124 28FH 


82718 


JR 


I KBIWL 


4026 W 


62728 


POP 


DE ' 


€27 C9 


82730 


RET 




4028 21462 


82748 flENU 


10 


HL3C48H»DISRJtVS 11 OPTIONS 


402B 222846 


82750 


LO 


C4820H)fHL 


4l>2£ 2i8E4fl 


82768 


LC' 


ILrCSS 


40310*840 


82778 


CS.L 


BOW 


4D34 aC83C 


32789 


LD 


HL.3T.C» 


€'37 222848 


82798 


LD 


(4828H;..ri 


4t>3fl mm 


82888 


LP 


HLNES6 


4030 urn,' 


82818 


iris. 


BUi, 


40:48 216B30 


82828 


L0 


rt3MBfi 


404< 222048 


82838 


LD 


(4828H) ; HL j 


4046 21E24H 


82848 


LO 


HLr€S7 


4049 COrM' 


82858 


CULL 


BLKM 


404C 214630 


02868 


LD 


,1_.304E5i 


€4F 222848 


82878 


LO 


C4828H;, HL 


€52 2iF64ft 


82388 


LD 


rL.HESS j 


4055 CDN4D 


82898 


OIL 


BLKH 


4056 218830 


62986 


LD 


rL3086H 


4056 222848 


82918 


LD 


{4929HX.HL 


405E21884B 


82926 


LD 


HL.r€S9 


4061C08840 


82936 


CALL 


BLKM 


4064 CS 


82948 


RE! 




€■65 8685 


82958 TflPRD 


LD 


B,98H jflESBCLES FULL BVTtrS FRQH TfiPE 


€■67 118888 


82968 Li 


L0 


E&8008H 


€*flCD78€ 


82978 


Cfli 


BIN j 


€60 18F8 


82988 


DJNZ 


LI 


406FC9 


82998 


RET 




€-78 C5 


63868 BIN 


PUSH 


BC 


€71 F5 


83818 


PUSH 


flF 


4D72 IB 


9392812 


DEC 


OE iTIIEOUT ROUTINE 


€73 76 


63838 


LD 


HO i-JltPS TO RETN J*CN TFPE IS 


€74 63 


83948 


OS 


E . OONE LOfC'INd NO WORE BITS 


€75Cftl24E 


83959 


JP 


Z.RETN 


4073 08FF 


03&W 


IN 


IK8FR0 


€7fli7 


93879 


RLH 




€7B38F5 


83938 


JR 


NC..L2 ! 


40/0 8641 


03099 


LD 


B,41H 


€7F 18FE 


83188 Li 


DM 


L3 


€81 E5 


83118 


PUSH 


HL 
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1082 (WEE 83128 


Lfti 


821EH 


«65 El 62138 


Ptf 


4. 


4086 8676 83146 


: r- 


6,76H 


4C38 18FE 83138 L4 


ME 


L4 


408fl D£F 83168 


IN 


fl, (8FFH) 


4NC 4? 83178 


LD 


EL A 


4D8P Fl 821S8 


W 


ff 


IDS C8M E1S8 


B. 


6 


4f>98 17 83296 


RU 




4D91F5 83218 


tW 


AF 


4092 E5 83228 


PU5H 


HL 


4D92CMEB2 83238 


CflLL 


B2JLEH 


40% El 83240 


POP 


HL 


4D97 Fl 83258 


POP 


flF 


4D98C1 B3268 


POP 


BC 


4099 C9 83278 


RET 




4WflE5 83288 ESCRN 


PUSH 


HL ,ERRSESCmETE SCREEN 


4096 C5 82298 


PUSH 


BC 


409CF5 83288 


PUSH 


ff 


4090 21883C 82218 


[ft 


HLXMN 


4W»81fF82 82228 


LP 


BC3FFH 


40fi2 3E28 82228 ffXT 


II 


ft' ' 


40fl5 77 83348 


LD 


(HL),R 


40H6 23 82258 


DC 


HL 


40A7 8B 83368 


DB 


BC 


4MB 73 63378 


Li 


RB 


4rX9Bi 02388 


OR 


C 


4MR 28F7 83398 


JR 


NZNEXT 


4DflC Fl 03480 


PIT 


ff 


40flD CI 83410 


PfP 


BC 


4DflE El 03428 


POP 


H 


4PFF C9 83438 


Be 




40B8 F5 83448 BUM 


PUSH 


ff 


4081 7f 83458 M 


id 


8. (HI) ; KITES fESRGES POINTED TO BY 


40B2 B7 83460 


* 


fl ;HL UNTIL ITRWSfiW 


€€3 28K 03470 


1 


im 


4W5 0F9C 83488 


CflLL 


OUTPUT 


*P68 23 82490 


Df 


H 


4DB9 18K B9N 


JR 


BLk' 


4T«8 Fl 83518 D*€ 


POP 


ff 


4PBCC9 83528 


RET 




Ctt 318849 03538 START 


LD 


SPl 49S8H, START OF WIN PROGRflfl HERE 


4OC0CW84D 03548 


CflLL 


ESCRN 


4DG 21882C 83558 


LD 


HL3CWH 


40C6 222040 83568 


11' 


(4828H),H 


82578 






40C? 210849 02588 


LP 


HLCH£S 


40CC CM84P 82598 


CH_ 


UN 


4WTC8B74C 82688 


CflLL 


LFCR 


4lv2 212648 03618 


Ift 


HLftSl 


4005 016040 82628 


CflLL 


BUN 


4MSCW74C 82638 


CflL 


LFCR 


4DD6 215048 82648 


LB 


WLWES2 


Kit CIW40 02658 


CflLL 


BUM 


40tlCW74C 03668 


CflLL 


LFCR 


4i€4 217948 02670 


LD 


HLNES3 


4C€7'H604O 02688 


CflLL 


BUM 


4DOCMF40 83698 AGN 


CflLL 


KBIN 


40£D FESD 02788 


CP 


CR 


40EF 28F9 83718 


JR 


NZflcn 


40F121094E 83720 


LD 


HL BUFFER 


4DF4 3E00 03738 


LD 


IV W*l 


4DF 6 CW2K 83746 


CflLL 


212H 



ON ADD-ON 
PRODUCTS FOR 



The largest family 

of disk drives from 

the largest supplier, 

drives come 

complete with 

power supply and 

cabinet. 

MTI-40 Disk Drive, 35 & 40 track $369 

TF-1 Pertec FD200. 40 track, use both sides $389 

TF-3 Shugart SA400. 35 track, same as tandy $389 

TF-5 MPI B51. 40 track $379 

TF-70 Miaopolis, 77 track with 195K of storage $639 

TDH-1 Dual sided drive, 35 track $499 




Vox Disk 2 10 Megabyte (fixed) 
Winchester Technology 



$5349 



NEW PRODUCTS 

16K Memory $66 

Modem $179 

Expansion interface 32K $499 

AC isolator $4795 



PRINTERS 



DP800 Anadex. 80 column. 1 12cps $949 

LP779 Centronics 779 $1099 

LP730 Centronics 730 $950 

LP700 Centronics 700 $1395 

LP701 Centronics 701 $1 759 

LP702 Centronics 702 $1995 

SPW-1 Spinwriter-NBC $2525 



NEW! LINE PRINTER 



Base 2 Printer 80. 132 co 
60 LPM with tractors 



* DRIVES FOR ANY MICROCOMPUTER * 

Does not include power supply & cabinet 

MOD II DISK DRIVES NOW AVAILABLE 

Pertec FD200 $ 282 

Pertec I D250 (dual head) $399 

Shugart SA400 (unused) $266 

Shugart SA800 $479 

MPI B52 $349 B51 $279 



SOFTWARE 

Disk Drive Motor Speed Test $19.95 

New DOS* with over 200 modifications and 

corrections to TRS-DOS $99 

New DOS- 40 track $110 

AjA Word Processor $75 

AJA Business Program $250 

Race? infinite Basic $49.95 

Disk Drive Alignment Program $109 

Radix Data Base Program $99.95 

Electric Pencil .. $150 

ALL PRICES CASH DISCOUNTED. FREIGHT FOB/FACTORY 



fiH 



/VICROCOMFVER 

TECHNOLOGY 
INCORPORATED ^28 




3304 W. MacArthur 

Santa Ana, CA 92704 

(714) 979-9923 



7310 E. Princeton Ave. 

Denver, CO 80222 

(303) 756-7275 




pporot, inc 



• Reader Service — see page 162 



80 Microcomputing, May 1980 • 105 



4Cf?u>9682 


63758 


Cfti 


23€h 


4DF C CK54D 


%fi(M LOOP 


CfiLL 


TBPRD ; R£fiDS 8VTE3 FROM TAPE flSD STORE 


4&FF 77 


8S78 


;fi 


(HL>,fl . t^ !?n"o ifsiw pniHTHj TO B 1 * 


€88 FEBD 


83788 


CP 


q? ; THE ft REGISTER PAIR 


€92 CC164D 


83736 


CfiLL 


7. BLINK 


€85 FEED 


83888 


pp 


bchr 


€87 CC164D 


63816 


call 


1 BLI* 


€88 23 


83829 


INC 


. HL 


4E8B CB7C 


83538 


Bli 


7..H ;1E5!S FOR 8UFFS (KERBjOH 


€80 CSBffl 


83848 


JP 


fC,TO«UCH ;3888HF0R16K!!iCH:»£ 


€18 le 


83856 


JR 


LOOP 


€12 3HM9 


83868 REIN 


LD 


SMSMMSQBMI J(IHPS HERE AFTER IT 


4£15 81D94E 


83878 


LD 


BbflURRBB; IBE5 Off 


4E18B7 


93388 


OR 


R 


4E19ED42 


83898 


SBC 


HLBC 


4£1B22E'?4£ 


83966 


LD 


(LOffiTH).. HL 


€i£CDm> 


83918 


CfiLL 


ESCRN 


€21 21863: 


83928 


LD 


H,3C8GH 


€24 222946 


93938 


LD 


C4828H%HL 


4E2? 21SWA 


83346 


LD 


HL !C54 


4E2B CDBMD 


93956 


CfiLL 


BUM 


€2DCDF86i 


83968 


CfiLL 


1F8H 


€38 wm 


83978 m 


CfiLL 


MENU >0IffUW5 NBA) OF ALL POSSIBLE 


4E33 CD1FC' 


83986 


CfiLL 


KBIN i OPTIONS 


4E36FE4D 


83996 


CP 


'W 


4E28QBHD 


64868 


JP 


z. start 


4E33FE52 


94818 


CP 


V 


4E3D caeeee 


84826 


JP 


Z. BASIC 


€48 FE43 


84838 


CP 


'C 


€42 2368 


94849 


JR 


MOW 


€44 FE53 


94656 


CP 


'S' 


4E€ CA9i4E 


84868 


JP 


Z.DISPLV 


€49CD9A4D 


84878 


CfiLL 


ESCRN 


€4Ci3E2 


94688 


JR 


AS 


4E4E CD9fi4D 


'34898 CGPV 


CfiLL 


ESCRN ; START OF COFV ROUTINE 


€51 21883C 


84186 


l R 


KL3C98H 


4E54 222848 


miii 


lD 


(V2WML 


€57 217948 


84129 


tn 


HUES 


4BRCHM 


94138 


CfiLL 


BLKH 


4E5T) U1F4.D 


84148 


CfiLL 


KBIN 


€68 2JX-94E 


94158 


LD 


HL BUFFER 


4E63 3E88 


84166 


LD 


R-88H 


4E65 CD1282 


84178 


Cfti 


212H 


4ES8 CD834D 


84158 


CfiLL 


8LF?8C 


4E6B CD8732 


84199 


.fll. 


337V 


4E6E ED€D7€ 34268 




K, (LENGTH) 



4E72 7E 


84218 HEXT1 


LD 


ft(HL) 


€73CD6462 


94229 


Cfti 


264H 


€76 23 


84238 


INC 


ft 


4E77 FECC> 


64246 


CP 


BCHR 


€79 CC164D 


84256 


CALL 


z blink 


4E7CFE8D 


94268 


CP 


CR 


4E7E CC164D 


84279 


CfiLL 


6 BLINK 


€8188 


94288 


DEC 


BC 


€82 78 


94298 


LD 


R.B 


€83 Bl 


84386 


OR 


C 


€84 2882 


94319 


JR 


Z-DEL 


€86 18Efi 


64328 


.IF' 


NEXT! 


€88 86FF 


64336 DEL 


LD 


B.8FFH 


€8fil6FE 


84346 DELI 


DJNZ 


DELI 


4E8C C0F881 


84358 


Cfti 


1F8H 


€8F189F 


84366 


JR 


ASK 


€91 313849 


84378 DISPLY 


ID 


SMMftBCIHEl DISFlfiV PROGRflH 


€94 111886 


84388 


LD 


DE.. 96188 


€97 2ft}?€ 


84398 


LD 


HL. (LENGTH) i INITIAL LENGTH OF TAPE 


€98 D021D9€ 84498 


LD 


ft BUFFER i INITIAL DATA 8f POINTER 


4E9EE5 


94418 M 


PUSH 


ft 


4E9FCD9B4D 


84428 


CALL 


ESCRN 


€fi2 CC€54C 


84438 


CALL 


BDR ; WRITES B5CIHBI LABELS ON SCREEN 


€fl5 21.863: 


94448 


LD 


HL3388H 


4ER3 mm 


34459 


LD 


(403P),fl 


€fi6El 


94468 


pnp 


II 


4BC wm 


94479 


CfiLL 


OTPUT 


4EFF CDS64B 


84488 


CfiLL 


OTPiJT 


4EB2 CC'9e4B 


84498 


Cfti 


OTPUT 


4EB5CDSWB 


94588 


CfiLL 


OTPUT 


€B8CD964B 


84518 


CALL 


OTPLiT 


4EBBCDSMB 


84528 


CfiLL 


OTPUT 


4cBECDSWB 


94538 


Cfti 


OTPUT 


€C1CP%46 


84.548 


CfiLL 


OTPUT 


4EC4 CD1F4D 


84558 


Cfti 


KEIN iCHECKS IF TO 130 OH OR 8UIT 


€C7FE8i 


84568 


CP 


BREAK .;BREf*:KEV=RET. TO HENU 


€C9CfiDl€ 


84578 


JP 


7, BRK ,OTHERKEV=OISPLflVH0RE 


CEX CD124C 


84588 


CfiLL 


LIST 


€CF18CD 


94599 


JR 


6K1 


€DlCD9fi4D 


84666 BRK 


CfiLL 


ESCRN 


€D4C336€ 


64618 


JP 


ASK 


6692 


84628 LENGTH 


DEFS 


2 J HOLDS LENGTH OF TfiPE TO BE COPIED 


4ED9 


84638 BUFFER 


Eft) 


t ; BEGINNING OF BUFFER AREA 


4DBD 


84648 


END 


START 


68998 TOTAL ERRORS 
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GENERAL 



Everyone had their own reasons for 
purchasing an 80 — here is one owner's story. 

An Owner's Tale 



John Dilbeck 
PO Box 187 
Smyrna GA 30081 



Eight years ago as a student 
at Georgia Tech, I was ex- 
posed to computer program- 
ming for the first time. As a part 
of my curriculum, I studied the 
basics of programming in FOR- 
TRAN and ALGOL. I was inter- 
ested and enjoyed the ex- 
perience, but I never expected to 
purchase one of those multi-mil- 
lion dollar electronic monsters. 

I had not even heard of the 
BASIC language at that time 
and, since I chose to discon- 
tinue my engineering studies, I 
was not exposed to program- 
ming or operating computers 
until one day about eighteen 
months ago. 

Then, the Radio Shack TRS-80 
came galloping over the horizon. 
I was reading a Radio Shack cat- 
alog and there was a fully as- 
sembled, honest-to-goodness 
computer that could almost un- 
derstand English. 

During the time I was kept 
waiting for the computer to ar- 
rive, I spent my time reading 
everything I could lay my hands 
on concerning BASIC, micros, 



programming, logic, etc. 

It only took about six weeks 
before I felt that I had control 
over most of the functions of the 
Level I system. I was able to 
write my own programs with 
ease and had begun to grow 
tired of hundreds of games of 
backgammon and blackjack. 

Expanding 

I eased on down to my Radio 
Shack store and asked, "How 
about getting me the Level II and 
16K mods for my 80?" (You can 
see how fast I was picking up 
the lingo.) 

A few weeks later, I got a call 
to bring my keyboard to the 
store. (This was at the height of 
the Level II backorder situation.) 
It was a week later that I tried 
out my new system and I real- 
ized that I had a lot of relearning 
to do. 

The first thing I learned was to 
convert Level I programs into 
Level II. 

I found that the conversion 
software took care of a lot of the 
changes, but not everything. For 
instance, there are not wrap- 
around graphics in Level II. I had 
been doing a number of experi- 
ments with graphics and had to 
rewrite extensively some of 
those programs. 

Also, you must DIMension the 
arrays in Level II. In Level I there 
is only the A(x) array, but it is 
limited only by the size of the 



memory. The arrays in Level II 
are also only limited by the size 
of the memory, if you first set 
the maximum size of the array 
by the use of a DIMension state- 
ment. 

I had just about mastered the 
Level II editing features (a great 
improvement over retyping the 
whole line), when the unexpect- 
ed occurred. 

I went into my office one 
morning and turned on the com- 
puter, and the whole screen 
filled up with letters, numbers, 
punctuation and graphics 
blocks in a random pattern (just 
as it does if you power off and 
then back on very quickly). I 
pressed the reset button and 
nothing happened. Then, I calm- 
ly turned the computer off, 
counted slowly to ten and 
powered back on . . . several 
times! It wouldn't work! 

I grabbed the ailing machine 
and headed for the Radio Shack 
computer doctor. It was sent to 
the regional repair center in 
Atlanta, where they replaced a 
ROM. 

More Memory 

I converted games to the Lev- 
el II dialect and I credit the prob- 
lems encountered when trans- 
lating these games with devel- 
oping the confidence I now feel 
when writing my own programs. 

While modifying one of my 
versions of Star Trek, I hap- 



pened upon another example of 
the Fifth Law of Computer Pro- 
gramming, as stated in Terry 
Kepner's article in the August 
issue of Kilobaud Microcomput- 
ing. Any given program will ex- 
pand to fill all available memory. 

By now, I was a raving com- 
puter freak. So, I went out and 
signed some more promises 
and ordered an expansion inter- 
face with 32K of RAM, a line 
printer and two disk drives. 

I ordered these additions in 
September, 1978; they began ar- 
riving in late November. How- 
ever, Murphy was right! Every- 
thing that could go wrong, did. 
And at the worst possible times. 

The directions for connecting 
two recorders were inaccurate. I 
made sure that I followed them 
correctly, stood back, scratched 
my head a few times, proceeded 
to reverse the order of the plugs 
and everything worked fine. 

This is a risky thing to do; I 
really don't recommend this ap- 
proach. 

I bought a recorder controller 
from Micro-Mega and I am 
pleased with the product and 
the response time of this com- 
pany. I would not use a recorder 
with the TRS-80 without one of 
these controllers. 

The Printer 

It is a wonderful feeling to sit 
back and watch the computer 
list its own programs or do re- 
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ports, graphs, pictures (Snoopy, 
for example), calendars, etc. The 
only thing this requires is a 
printer that works properly. 
Mine didn't! 

My printer is the Centronics 
779 that is modified slightly for 
Radio Shack and has been noth- 
ing but trouble, though every- 
one, including other owners 
agreed my problems were 
unique. 

I had two problems with the 
printer. As the print head moved 
across the platen, occasionally 
the ribbon would hang up caus- 
ing pins to strike the same 
place on the ribbon. The 
print became progressively 
fainter until I noticed and cor- 
rected the problem (see Exam- 
ple 1). 

Secondly, as the printer was 
listing reports, the head assem- 
bly might go awry. It sounded 
like both of the solenoids had 
activated at once, causing the 
head to try to go both forward 
and return at the same time. 

As a result of this malfunc- 
tion, the printer thought it had 
already printed part of a line, 
and would continue across the 
page. It then printed whatever 
was still left in the buffer 
resulting in only partial lines be- 
ing printed (see Example 2). 

This could be very frustrating, 
especially at the end of a 
15-minute printout. 

I sent the printer to the region- 
al repair center in Atlanta, along 
with samples of the printouts it 
had produced. They sent it back 
in a few days, after cleaning it, 
and said that nothing was 
wrong with the printer and that 
the problem must be in the soft- 
ware. 

I then went through the soft- 
ware and to be absolutely sure, I 
rewrote each line of the program 
that generated output to the 
printer. Despite Radio Shack's 
assurances the printer contin- 
ued to malfunction. 

I sent the printer off again and 
it was returned with a note say- 
ing that there was nothing 
wrong with it. 

The next time i returned the 
printer, I also sent the keyboard 
module and the expansion inter- 
face. Again, it was returned with- 
the implication that my software 
was to blame. 



mm ofhTsoTneian. mx, wiUHSR *%. m?, we 
mc- - -1,-fhi-i - far. mm 

m» KWitcwi rewft.-***, ■:nmro?»Hii; mm<m,M, mesne 
a» ftMfBim, mimsi.m-. . mmm. hm, mmm.mi mmm 

m PB1HTK7, *», JRWTtUhllft K1K7CSIHII, ttW'^B.K.Ui H1IWW *». «R]N . .1 

M HMM r.Ntunwan*. JMMCMM *■ »-*i '•• M 

w. i>.x=i«>tiNHi7)tt<x<«B)noeixiitntiifliK.Ki mvmm,mti asmn tnm 



mm * f 

mxm r 



Example 1: My ribbon occasionally hangs up causing the 
printer to strike the same place. 



I was starting to get upset. 

It was about this time that 
both of the disk drives arrived 
and I temporarily forgot about 
the printer. 

Disk Drives 

The mini-disk method of stor- 
ing and retrieving data is much 
faster than cassette and this is 
especially noticeable when 
loading 14-18K programs. 

I was annoyed by the occa- 
sional LOST DATA DURING 
READ errors, until one day, dur- 
ing a write-to-disk, the computer 
"froze-up." I waited, in case it 
might be doing some operation I 
wasn't aware of such as house- 
keeping, rearranging the data, 
etc. 

After five minutes I came 
back and pressed reset. That 
didn't work, so I turned off the 
power, waited for a few seconds 
and then turned it on again. 

This was the procedure I was 
used to and I didn't think too 
much about it. However, this 
time it erased both diskettes in 
the process. At least I had a 
backup of the TRSDOS disk and 
didn't lose anything on #1 that 
couldn't be easily replaced. 

I'm still not sure what hap- 
pened, but since that day, I have 
been very careful to use the 
following procedure: 

1. Turn on video. 

2. Turn on the expansion 
interface. 

3. Turn on the disk drives. 

4. Turn on printer. 

5. Turn on the keyboard. 

6. Insert disks into drives. 

7. Press RESET to load 
DOS. 

If I have to power off any time 
after the disks are in, I remove 
the diskettes first. Also, it is im- 
portant to be sure that a backup 
is made of each diskette, in case 
it is accidentally erased or dam- 
aged. 

Using TRSDOS 2.1 , 1 had a ter- 



rible time with lost data and 
other disk related errors. One of 
the salesmen at the Atlanta 
Computer Center suggested I 
move my disk drives away from 
the left side of the video. It 
seems that there is a magnetic 
field there which wreaks havoc 
with disk READ/WRITE opera- 
tions. I moved the disk drives 
several inches to the right side 
of the keyboard and this re- 
sulted in some improvement. 

But, I was still getting errors 
and garbage inserted into my 
programs. Sometimes this gar- 
bage would change commands, 
mess up the numbering, lose 
whole sections of the programs 
and other insidious actions. 
This was very frustrating. 

I returned the disk drives to 
the Atlanta Radio Shack Com- 
puter Center for repair. The re- 
pairman cleaned both drives but 
found nothing wrong. When I 
hooked them up I still had the 
same problems. 

I Return Everything! 

Once more, I took the printer 
and both of the drives back to 
the repair center. One techni- 
cian said that the stepper motor 
in drive was defective and 
ordered a new one. Another 
technician finally found the real 
problem, one of the screws was 
loose and he tightened it. It 
worked much better, but still my 
machine was not cured. 



When I returned the keyboard 
and interface to the computer 
center, to install the buffered 
cable, performance improved. I 
was no longer losing programs 
or having them altered by the 
machine. 

I was still trying to get the 
printer functional. Extremely 
frustrated, I had consulted with 
a lawyer about filing suit 
against Radio Shack. I sent the 
printer back one more time, in- 
forming Radio Shack that I was 
ready to institute court action. 
When I received it this time, the 
printer worked fine. I still don't 
know what they did. 

Reflecting back on these 
events, I have some thoughts I 
would like to pass on. 

1. READ! Read the instruc- 
tions and information about all 
your hardware and software. 
Read periodicals devoted to mi- 
crocomputers and keep up to 
date. 

2. PERSIST! Though it took a 
number of trips and several 
false starts, my Radio Shack 
system is working very well now. 

3. 1 have learned from the Ra- 
dio Shack newsletter that the 
upper six bytes of a 48K system 
should not be written into. When 
entering BASIC, answer the 
"MEMORY SIZE?" with 65529. 

4. Get together with other 
TRS-80 owners and form a 
users' group. Learn about your 
computer as you introduce 
others to its uses. 

5. For you Radio Shack peo- 
ple, I'd like to suggest an upper- 
lowercase modification and im- 
proved graphics. 

Though I've had much trou- 
ble, I feel my experiences were 
the exception rather than the 
rule. I hope my review will en- 
courage others to enter the 
world of microcomputing. ■ 



1828 PRINT9J*ie*634,fl<W+J>:NEXTJ: RETURN 

2808 IFQ-1 THEN FORY-7TO12:fKZ+V:>«0:NEXTY 

2626 R(W*?>»fKW+l> :F0R.T-2T06:RcW+7>-fl<W+7>-fl<U+J> NEXTJ 

2838 PRINTG785, "NET PflV»", fl(W+7> PRINT PRINT 

2838 F0RV-lT07:fl<.W*V+7>-f)<w+V*7)+fl<W*V) 

2855 NEXTV : F0RV-1T06 

flCZ+V+6>»fl<Z*V+6)*fl<W*V) FKZ+V+12:>«FI<Z+Y+12>+fUW+Y> NEXTY 

2865 PRINT9384, " UPDATED" : G0SU8228: PR I NT9768. " "; 

2966 IFA<U+l>=8INPUT"TERMINflT£— 1-VES, 2-NO"; D : IFD=lfl<Z*5> 

2878 INPUT"HIT ENTER TO GO ON". B* NEXTX 

2888 IFBO8G0T02895 

2898 INPUT"* OF NEW EMP "i C B-N IF08N-C : G0T078 

2895 N-B+C 

2180 cls Gosueseee 



Example 2: My printer would only print partial lines. 



) 
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ADVANCED BUSINESS 
SOFTWARE FOR THE TRS-80 

(Now AvailaUt Far Model II Abo) 
' FORECASTING * RISK ANALYSIS ' U.S. MACRO MODEL 

If you're serious about improving your business 
with a computer, why not use the best business planning software 
available? Or. David M. Chereb has made the most powerful and 
successful business analytical techniques available to micro 
computer users 

All programs listed below are in Basic, for 32K (or more) disk 
based TRS-80 systems 

BUSINESS PLANNING PACKAGE fir FORE- 
CASTING - An integrated set of forecasting programs 
to handle a variety of business forecasting needs 
from Trend Analysis to Advanced Multiple Regres- 
sion (100 pg. User Manual) $99. 
INVESTMENT RISK ANALYSIS The major ingred- 

ient in any investment is uncertainty. This 
program accounts for cost changes, shifting 
revenue streams and interest rate fluctuations 
Now you can manage risk (35 pg. User Manual) 
J 99 
U.S. SIMULATION MODEL Knowing where the 

economy is going and how it reacts to government 
fiscal and monetary actions can save you a lot of 
money. This is a user oriented economic situation 
model constructed to professional standards (50 
pg. User Manual} $199 
NOTICE TO CUSTOMERS: 

Because of the tremendous increase in recent 
orders, our shipping response time has slotted We 
are expanding in order to correct this situation But 
for the next month our shipping date will average one 
week after receipt of your order 

To order CALL 213/424-3852. or write to APPUEO ECONOMIC 
ANALYSIS. 4005 Locust Ave. Long Beach. CA 90807. 



DATA BASE MANAGER I0M-IV $69 

You can use it to maintain a data base & produce reports without any 
programming Define file parameters & report formats on-line Features key 
random access, fast multi-key sort, field arith label generator, audit log 
MOD-II version with more than 50 enhancements $199 

ACCOUNTS RECEIVABLE ACCT-III $69 

One or more drives. Order entry calculates sales tax, shipping, amount for 
multiple items. Credit checking, aging, sales analysis, invoices, statements 
and reports As opposed to most other A/R. ours can be used by doctors, 
store managers, etc. MOO-II version $149 

WORD PROCESSOR 16* $39 32K $49 MOO-II $49 

First word processor specifically designed tor the TRS-80 that uses disk 
storage for text Written in BASIC No special hardware and text limit Use 
for letters, manuals & reports. 32K version features upper /lower case 
without hardware change and multiple input text files. 

MAILING LIST advanced MAIL V $59. 

Fast sort by any field. Multiple labels and reports 4-digit selection code, 
new zip code ext.. screen input, live keyboard, powerful report writer. MOD-II 
$99 

INVENTORY INV-V S99. 

9-digit alphanumeric key for fast key random access Reports include order 
info, performance summary, etc Calculate E Q Powerful report writer 
MOD-II $149 

Ail programs are on-line, interactive, random access, virtually bug free, 
documented and delivered on disks. MOD-I requires 32K. DOS. We challenge 
all software vendors to offer low cost manuals so you can compare and 
avoid those high-priced undocumented, on-memory' programs Send $5 for 
a MODI manual and $10 for MOD-II 

MOD-II programs are extensively modified, guaranteed to run with 1 year 
newsletter I updates 10% off for ordering more than 1 MOD-II programs 

MICRO ARCHITECT "* 

96 Dothan St.. Arlington. MA 02174 






Sirius Systems introduces lower 
prices to quality drives! i, 




Remex RFD 4000/8 
Floppy Disc Drive 
Double the storage' 
Double sided . . . 
Double density!! 

54995 

Otters quality and features tocnd in drives costing 
much, more' ■ Single or DooWe Density ■ Double-Sided Orrve ■ Door 
l ccklNCLuDCDB Write Protect iNClUOFDB 180 Day Warranty 
■ Compatible wttb Sbugart 850/851 ■ 1 0* Power Operation ensures 
LONGER LIFE'! ■ Model RED 4001 often Data and Sector Separator 
AVMLAfif omoxt'ACCi ssoeiti 

Dual Or»v* 9r*m S«?t* J Smgto 0** Pomr Sup* am Cabw* SUA K 
andCaMtt S13995 1 Imcriaot Man«l K 95 

-OCUMril SS» nonwCifcn* CT » i |RH)4001 $564 95 

SIRIUS 

The Perfect 
Add-On fer 
yew TRS-80' 

" '■' , •"■.■■ "' 
*woV topnelrt 

and mm! 

• ton* tract a tree* 




MNMSt-H 

(SmgkHutf) 

smrjsh-z rj.i -ttisi S419.9S 



MPI-51/52 

A Great 
Reliable 
Miai-Orive' 

lo tract tarns 

&*i\dOas*j* 
• U««jm Dovitltaor fttaAMim 

"2* ^0*»Q 95 

an St Du*Hno. S349 95 




Remei 1O00B 

If you've been looking tor a 
less expensive floppy disc 
drive, but not wanting to 
sacrifice quality — 
your search is over! 

41 9 9 * 







Yocget both m ttte Remex 10006' For only $4 19 95 look at wbal you get 
8' Floppy Drive ■ Single or Double Density ■ Hart) or Soft Sectoring ■ 
Media Protection Feature ■ Single Density Data Separator ■ 180 Day 
Factory Warranty 

MAJuau onions acct sseftcs 

-]OaaflM».Src» -ONtfOrwiPQwtrSwy |»i K j Mwiaot UnJ $? K 

1 W*» *o<*» 119 14 ~ S.ngft Orrv* Po** S«W*. S69 H J MtTiot Afl«cn*' . St? 96 
_] CoflMCtors Sfi » Dnw Cjt*+ S?4 9! Qwnti to S" u ;it 



O 



saws 

SYSTEMS 

^S7 



PO BO- 974«. Rno«M» T|( 3tK 
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JCNck [ Money Onw ~] COD MC ! ". * > 
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T»~~ CAWHrXKASMiwTURr 



Add %7 00 c*» Or*c tm Snioomo»W»n(jhnQ W"tum t i a w l * toa «\ <jte« <u 
met 10*!. (pjywww m U S curwncv v*, i 



i* Reader Service — see page 1 62 
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GENERAL 



With a modem and RS232 your 80 can talk 
to the world — if you can afford the phone bill. 



Computer Bulletin Boards 



Jim Cambron 
PO Box 10005 
Kansas City, MO 64111 



One of the fastest growing 
uses of microcomputers 
these days is for exchanging in- 
formation between computers 



over the phone. 

Private companies for a fee 
will let you access their comput- 
ers to run programs, games and 
the like, or find a wealth of infor- 
mation, ranging from the latest 
sports scores from United Press 
International, to finding which 
restaurant in Cleveland offers 
the best service. There is an al- 
ternative to such national enter- 
prises and one may be up and 
running in your town! 



WORD LENGTH 

PARITY 

STOP BITS 




7 bits (8 bits tor TRS-80 Graphics) 
even, no parity. 
1 stop bit 

Table 1. 



Computer bulletin boards, 
also known as electronic mes- 
sage systems or electronic mail- 
boxes, supported by local clubs, 
retailers and individual hob- 
byists are simple systems per- 
mitting the user to enter and 
retrieve messages. 

Several bulletin board soft- 
ware sources are available for 
Radio Shack's TRS-80. One of 
the most useful is the Forum-80 
package offered by Bill Abney, 
Kansas City, MO. Abney has 
organized a network of 
operators who regularly receive 
updates of the system software 
as well as suggest software im- 
provements to the Forum-80 
package. One of the latest — not 
yet available on all 



systems-allows a user to 
download a BASIC program 
from the Forum-80 to your 
TRS-80 (or other micro) using ST 
80 D or another terminal pro- 
gram with similar downloading 
features. 

Although every bulletin board 
has it's own personality, as you 
will soon find out, there is 
almost total standardization of 
serial word length, parity, stop- 
start bits and baud rates. This 
means that you can program 
your RS-232 board as described 
in Table 1 and communicate 
with nearly every bulletin board 
in the country. 

What Do You Need? 

To access a bulletin board 





Table 2 




ABBS 


RAINBOW COMPUTING LOS ANGELES (21 3) 349-5728 








ABBS 


SAN ANTONIO TX 


(512)657-0779 


TTPE 


NAME 


PHONE NUMBER 


ABBS 
ABBS 


SAN FERNANDO VALLEY CA. 
WEST PALM BEACH FLA. 


(213)340-0135 
(305)689-3234 


ABBS 


A.C.E.S. FT. LAUDERDALE FL. 


(305)566-0805 




BILLBOARD 80 SAN JOSE CA, 


(408)263-0248 


ABBS 


AKRON DIGITAL GROUP 


(216)745-7855 


CBBS 


ATLANTA, GA. 


(404) 394-4220 


ABBS 


ABBS ATLANTA ATLANTA GA. 


(404)953-0723 


CBBS 


BOSTON MA. 


(617)963-8310 


ABBS 


ABBS BOSTON BOSTON MA 


(617) 354-4682 


CBBS 


CHICAGO IL. 


(312)528-7141 


ABBS 


CALL APPLE VANCOUVER WA. 


(206)524-0203 


CBBS 


DETROIT MICH. 


(313)288-0335 


ABBS 


CCNJ POMPTON PLAINS N.J. 


(201)835-7228 


CBBS 


NW PORTLAND ORE. 


(503)646-5510 


ABBS 


ABBS CHICAGO CHICAGO IL 


(312)622-9609 


CBBS 


SAN FERNANDO LOS ANGELES 


(213)843-5390 


ABBS 


COMPUTER COMPONENTS LAWNDALE 


(213) 371-1660 


CBBS 


WASHINGTON D.C. 


(703)281-2125 


ABBS 


COMPUTER COMPONENTS WESTMIN. 


(714)898-1984 


CMMS 


CMMS CHICAGO 


(312)925-0259 


ABBS 


COMPUTER FORUM BUENA PARK 


(714)739-0711 


COMM-80 


COMM-80 ORANGE CO. CALIF. 


(714)526-3687 


ABBS 


COMPUTER LAB MEMPHIS TN 


(901)761-4743 


COMPUSYST 


COMPUSYSTEMS COLUMBIA S. CAR 


. (803)771-0922 


ABBS 


COMPUTER MERCHANT SAN DTEGO 


(714)582-9557 


FORUM-80 


FAMILY HISTORIAN FORUM VA. 


(703)978-7561 


ABBS 


COMPUTER STORE SANTA MONICA 


(213)394-1505 


FORUM-80 


DALLAS TEXAS 


(214)288-4859 


ABBS 


COMPUTER WORLD IRVINE CA. 


(714)751-1422 


FORUM-80 


DUNSTABLE MASS. 


(617)649-7097 


ABBS 


DALLAS DALLAS TX 


(214)634-2775 


FORUM-80 


FORT WORTH TEXAS 


(817)923-0009 


ABBS 


FT. WALTON' BEACH DESTIN FL . 


(904)243-1257 


FORUM-80 


KANSAS CITY, MO 


(816)861-7040 


ABBS 


HAWTHORNE HAWTHORNE CA 


(213)675-8803 


FORUM-80 


MEMPHIS TENN. 


(901)276-8196 


ABES 


HOUSTON HOUSTON TX 


(713)977-7019 


FORUM-80 


ENGINEER-80 OLATHE 


(913)764-1520 


ABBS 


ILLINI MICROCOMP. NAPERVL. IL (312) 420-7995 


FORUM-80 


ORANGE COUNTY SANTA ANA CA 


(714)730-1206 


ABBS 


KORSMEYER ELECT. HUNTINGTON 


(714)962-7979 


FORUM-80 


PRINCETON NEW JERSEY 


(201)874-6833 


ABBS 


MARINA DEL REY MARINA DEL REY (213) 821-7369 


FORUM-80 


SAN FRANCISCO 


(415) 348-2139 


ABBS 


MIAMI MIAMI FL. 


(305)821-7401 


FORUM-80 


WICHITA, KANSAS 


(316)746-2078 


ABBS 


NEW YORK LONfl ISLAND N.Y. 


(212)448-6576 


FORUM-80 


WICHITA FALLS TEXAS 


(817)855-3916 


ABBS 


PCNET SAN FRANCISCO CA. 


(415)948-1474 




MUSE CO., PARKVILLE MD. 


(301)661-8962/63 


ABBS 


PEOPLES MESSAGE SYST. SANTEE 


(714)449-5689 




NEW ENGLAND COMP. SOC. 


(617)897-0346 


ABBS 


PERIPHERALS UNLIMITED SIG. 


(213)424-3506 




POTOMAC MICRO MAGIC VA. 


(703)750-0930 


ABBS 


PERSONAL COMPUTERS OF CHIC. 


(312)337-6631 




REMOTE NORTH STAR ATLANTA 


(404)939-1520 


ABBS 


ABBS PHOENIX 


(602)957-4428 




S. JERSEY ELECT MAIL SYST. 


(201) 457-0893 
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system, you need a Level II TRS- 
80, an expansion interface with 
an RS-232 board installed, a 
modem and a software program. 
The program must organize the 
communication between the 
keyboard, CRT and the serial 
port. 

This program can be written 
in BASIC, although it is far more 
efficient to write a machine lan- 
guage program to do the job. An 
example of such a program in 
Z-80 code for the TRS-80 is 
found in Program Listing 1. The 
concept is simple and you 
should be able to write a similar 
program for your system. 

The idea is to constantly scan 
the serial port and the keyboard 
for an input from the outside 
world. If a byte is received from 
the keyboard, it is sent tc the 
serial port. If a byte is received 
by the serial port, then it is dis- 
played on the CRT or printed. 

Once you have written or pur- 
chased a terminal program, you 
are ready to call a bulletin board. 
With the serial port set up as 
described in Table 1, pick up the 



telephone receiver and call the 
nearest bulletin board system 
(see Table 2). When the other 
end answers, you should hear a 
tone on the line. 

Set your modem on Originate 
as described in the instruction 
manual. If all goes well, some 
sort of message will appear on 
your CRT/printer. If not, press 
your carriage return key several 
times until the distant system 
responds. 

The bulletin board system 
may ask you some mysterious 
questions like "DO YOU NEED 
LINEFEED?' and DO YOU 
NEED NULLS? (0 TO 50) - Answer 
'N' to the linefeed question. 

If you are using a printer with 
your TRS-80, slower than 300 
baud, answer the NULLS ques- 
tion with an appropriate number 
between 1 and 50. If the number 
you enter is too small, the first 
characters in each line will not 
print because the head of your 
printer is in the process of a car- 
riage return while those charac- 
ters are being sent. 

By entering a large enough 



7ab/e 3. Forum-80 Operating Instructions. 

PASSWORD PROTECTED MESSAGES ARE ENTERED USING THE NORMAL 
MESSAGE ENTRV ROUTINE (COMMAND 'E'> WHEN PROMPTED TO ENTER 
THE 'SUBJECT :', THE FIRST 3 CHARACTERS ENTERED SHOULD BE (P) 
<THE P MUST BE UPPER CASE ! ) THIS SHOULD BE FOLLOWED BY YOUR 
PASSWORD <N0 SPACE BETWEEN '(P)' AND THE FIRST CHARACTER OF 
YOUR PASSWORD !). ALL CHARACTERS FOLLOWING <P> UP TO THE FIRST 
SPACE HILL BE CONSIDERED AS YOUR PASSWORD. PROTECTED MESSAGES 
ARE RETRIEVED USING THE PROTECTED MESSAGE RETRIEVAL ROUTINE 
WHICH IS ENTERED BY COMMAND '?' THE MESSAGE CANNOT BE 
BE RETRIEVED WITHOUT THE CORRECT PASSWORD 

CONTROL CHARACTERS RECOGNIZED BY THE SYSTEM: 

'D' - DELETES THE GREETING PAGE t COMMAND LIST UPON 

ENTERING THE SYSTEM RECOGNIZED ONLY IN THE PAUSE 
AFTER ANSWERING THE LINEFEED QUESTION 
'S' - STOPS CURRENT FUNCTION AND PROMPTS FOR NEW COMMAND 
ACTIVE IN SUMMARY, MESSAGE RETRIEVAL, USER LOG, 
HELP AND INFORMATION ABOUT SYSTEM. 
'P' - PAUSES AND ALLOWS 2 MIN TO STUDY SCREEN TO CONTINUE 

HIT ANY CHARACTER ACTIVE WHEN 'S' IS 
'N' - USED ONLY IN MULTIPLE MESSAGE RETRIEVAL SKIPS THE 
MESSAGE CURRENTLY PRINTING t GOES IMMEDIATELY TO THE 
NEXT MESSAGE IN SEQUENCE. 
NOTE: THESE ARE UPPER CASE ALPHABETICAL CHARACTERS. 
NOT CONTROL CODES ! 

TO RECEIVE GRAPHICS YOU MUST MODIFY YOUR R S. TERM PROGRAM 
TO INITIALIZE WITH 8 BIT CHARACTERS AND TO ACCEPT AND TRANSMIT 
ALL 256 POSSIBLE CHARACTER CODES THIS CAN BE DONE BY LOADING 
YOUR TERM PROGRAM INTO MEMORY ALONG WITH TBUG OR RSM, HAKE THE 
FOLLOWING CHANGES. THEN PUNCH A NEW TAPE (DISK USERS WILL FIND 
IT CONVENIENT TO USE DEBUG TO HAKE THE CHANGES. RETURN TO DOS 
AMD CREATE A NEW DISK FILE WITH TAPEDISK ) 
CHANGE ALL THE FOLLOWING ADDRESSES TO CONTAIN THE BYTE SHOWN 

seie ■ bi seiB thru 5828 = ee 

5861 « D3 5867 * 3E 

5862 ■ E8 5868 ■ 55 

5863 « 3E 5869 « D3 

5864 « E5 586A « E9 

5865 « D3 5868 * C9 
586C ■ EA 

REMEMBER. WHEN OPERATING IN GRAPHICS MODE. YOU MUST ENTER THE 
FORUM-88 BY HITTING THE 'G' KEY. NOT C/R WHEN ENTERING 



r»«PHir<; NFsenfir^ ec sunc to start tmc subject Lire hi i 
FOR THE PROTECTION OF THE NON-GRAPHICS USER. 



S (SUMMARY OF MESSAGES IN SYSTEM) 
Q (QUICK SUMMARY OF MESSAGES) 
H (HELP WITH SYSTEM OPERATION) 
I (INFORMATION ABOUT SYSTEM) 
P (PROTECTED MESSAGE RETRIEVAL) 
(OTHER SYSTEM PHONE NUMBERS) 
T (TERMINATE CONNECTION) 
F (FLAGGED MESSAGE RETRIEVAL) 



L (LOG ON AGAIN) 
E (ENTER A MESSAGE) 
R (RETRIEVE MESSAGES) 
K (KILL A MESSAGE) 
U (USERS LOG) 
N (NULLS CHANGE) 
G (GRAPHICS INFO) 
C (CHANGE L/F SWITCH) 



MESSAGE RETRIEVAL IS ENTERED USING THE 'R' COMMAND YOU WILL 
BE ASKED IF YOU WISH SELECTIVE RETRIEVAL AS IN THE SUMMARY. 
ANSWERING YES WILL ALLOW YOU TO SEE ONLY THE MESSAGES WHICH 
MEET YOUR SEARCH CRITERIA IN BOTH REGULAR MULTIPLE RETRIEVAL 
AMD SELECTIVE MULTIPLE RETRIEVAL YOU HILL BE ASKED FOR THE 
STARTING AND ENDING MESSAGE NUMBERS THIS ALLOWS YOU TO 
RETRIEVE OR SEARCH A SPECIFIC RANGE OF MESSAGES HITTING C/R 
FOR STARTING MESSAGE NO DEFAULTS TO THE BEGINNING OF THE FILE 
AND FOR THE ENDING MESSAGE NO DEFAULTS TO THE END OF THE FILE 
IF YOU ANSWER NO (OR C/R) TO THE MULTIPLE RETRIEVAL QUESTION 
YOU WILL BE IN SINGLE RETRIEVAL MODE THE SYSTEM HILL RETRIEVE 
EACH MESSAGE AS YOU ENTER THE NUMBER AT THE END OF A MULTILPLE 
RETRIEVAL YOU ARE RETURNED TO SINGLE REPRIEVAL MODE TO RETURN 
TO COMMAND MODE HIT C/R. 



MESSAGE ENTRY IS ACCOMPLISHED WITH THE 'E' COMMAND THIS 
FUNCTION IS SELF PROMPTING YOU ARE ALLOWED 16 LINES OF 63 
CHARACTERS EACH THE ONLY CONTROL CODES RECOGNIZED IN MESSAGE 
TEXT ENTRY ARE 

CONTROL 'H' - (LEFT ARROW) BACKSPACE AND DELETE 

ONE CHARACTER 
CONTROL 'I' - (RIGHT ARROW) TABS RIGHT IN 8 SPACE 

INCREMENTS 
CONTROL 'X' - (SHIFT LEFT ARROW) DELETES THE ENTIRE 
LINE 

SUMMARY IS ENTERED USING THE 'S' COMMAND VOU WILL BE ASKED 

IF YOU WISH A SELECTIVE SUMMARY ANSWERING YES TO THIS 

WILL ALLOW YOU TO SEE A SUMMARY OF ONLY THE MESSAGES WHICH MEET 




Adventure 
International 




Proudly Announces 

GALACTIC EMPIRE 

by Doug Carlston 

(For The TRS-80 Level 2 16K) 

Beyond all Star Trek programs! This real time 
simulation pits you and your puny fleet against 
an entire galaxy. Traveling at sublight speeds, 
assisted by your executive officers you must 
carve out a Galactic Empire. As system after 
system is conquered you'll add to your growing 
fleet, but be careful to plan far enough in ad- 
vance or ships and supplies may not reach you 
in time and populations may revolt! You'll have 
1000 years to accomplish your mission, but be- 
warned, few mortals are able to outlive a millen- 
ium! 

Available now for $14.95 from the company 
that brought you Adventures . Write for free 
flyer or ask for it at your local computer dealer. 

Adventure International ^97 
Box 3435 
Longwood, Fl 32750 
Visa/MC orders, call (305) 862-6917 



■ Reader Service — see page 162 
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YOUR SEARCH CRITERIA. FOR EXAMPLE, IF YOU WANT A SUMMARY OF 
ALL THE MESSAGES PERTRINIHG TO THE TRS-8B, YOU MOULD SEfiRCH THE 
F<ROH> FIELD FOR THE STRING 'TRS-88'. IF YOU DO MOT MHNT TO 
SEfiRCH THE FILE THEM ANSWER 'N' OR JUST C/R IN BOTH SELECTIVE 
AMD NORMAL SUMMARY YOU MILL BE ASKED FOR A STARTING MESSAGE 
NUMBER. ENTERING THE NUMBER OF THE LAST MESSAGE YOU HAVE SEEN 
MILL GIVE YOU A SUMMARY OF ALL MESSAGES SINCE VOUR LAST CALL 
OR HITTING C/R MILL GIVE SUMMARY OF THE ENTIRE FILE 

FLAGGED MESSAGE RETRIEVAL IS ACCOMPLISHED AS FOLLOWS: 

1 ENTER THE REGULAR SUMMARY WITH COMMAND 'S' 
Z AS EACH MESSAGE HEADER IS PRINTING, DECIDE IF YOU WISH TO 
SEE THAT MESSAGE. 

3. AFTER THE HEADER HAS COMPLETED PRINTING. IF YOU WISH TO 
SEE THAT MESSAGE, HIT '?' ANYTIME DURING THE PRINTING OF 
THE NEXT HEADER 

4. AFTER YOU HAVE FINISHED THE SUMMARY AND RETURNED TO THE 
COMMAND MODE, USE COMMAND 'F' TO RETRIEVE THE FLAGGED 
MESSAGES. 



number to the NULLS question, 
you force the bulletin board 
system to send null bytes (00 
hex) while your printer is ex- 
ecuting a return. 

Using the Bulletin Board 

The bulletin board now prints 
a greeting and asks you your 
name. Use your given name; it's 
important. Many of the bulletin 
boards scan the name inputted 
and compare it to the TO field of 
messages in the system. The 
board indicates to the person 
signing on that there is a 









Program Listing 1. 


TRS-80 Terminal Program 1 






.;ni 100 


SIMF1E MACHINE LHNUUHOE 


TERMINAL PROGRAM FOR THE 






00110 


RADIO SHACK TRS-88 MICORCOMPUTER WRITTEN BY 






00120 . 


JIM . 


RHBRON R 


BO:: 1OO05 KANSAS CITV. MO 64111 






00120 . 


REQUIRES EXPANSION INTERFACE AND RS-232 BOARD' ! 






00140 . 














00150 ■ 


1 PROGRAM INIT IAi I3HTIUN 






00160 










7F98 




00170 


OF I". 


7F90H 


F IRST 


INSTUCTIOH IS AT 7F 98H 


002B 




00180 KBD 


ECU 


2BH 


TRS-80 


KEYBOARD SCAN ROUTINE 






001*0 






IN BASIC ROM IS AT LOCATION 2BM 


0023 




00200 CRT 

0021 LI 

00220 • 


EQU 


32H ; 


TRS-80 

IN BH? 


VIDEO DISPLAY ROUTINE 

IC ROM IS AT LOCATION 23H 






0023O . 


NOTE 


TO NUN TRS-88 USERS 


TO RUN THIS PROGRAM 






00240 . 


VOUR 


2-30 MICRO. PLUG VOUR KEYBOARD AND 






00258 . 


v'll'l H POUT INK', INI l.i 1W 


above EQUATES 






00260 . 














00270 : 


THE ACTUAL PROGRAM START 


S HERE 






00280 ■ 










7F90 


310668 


00290 START 


LD 


SP. eeoeN 




, SET STACK POINTER 


7F93 


3E1C 


UO .... 


LD 


A. 2SD 




. CLEAR SCREEN 


7F95 


£03388 


.«, HI 


HLI 


CRT 




. (HOME AND CLEAR SCREEN > 


7F98 


2E1F 


OO320 


LD 


A. 2 ID 






7F9A 


CD220O 


©0330 


CAIL 


CRT 






7F9D 


:eoe 


OO240 


LD 


A. 14D 




. TURN ON CURSOR 


7F9F 


CD32U6 


00350 


CALL 


CRT 




. CHARACTEP 


7FA2 


D3E8 


OO360 


OUT 


• 8ESH ■ . A 




RESET RS-232 


7FA4 


2E55 


.... -o 


LD 


A, 55H 




i SET BAUD RATE < 55H = 300 BAUD' 


] 7FA6 


D2E9 


00 £ O 


OUT 


• 0E9H ■ . A 






1 7FA8 


"EA5 


00390 


LP 


A. 0A5M 




. INITIALIZE FOR THE 


7FAA 


D3EA 


00400 

00410 

0042O 

08428 
00440 

00450 
00460 

00470 

08488 . 


0U1 


• OEAH .' . A 




. CORRECT BIT COUNT 

. AND PARI TV ETC 

. BASH * 10108101 BINARY 

SEVEN BIT REGULAR 

MODE 
. 0E5H = 1110O101 BINARY 
; EIGHT BIT GRAPHIC 
; MODE 






00490 . 


2 


THE TEPMINHl 


SCAN LOOP 






00500 . 










7Fhi- 


CDB4 7F 


0O51O LOOP 


CALL 


INPUT 




. CALL THE INPUT ROUTINE 


7FAF 


CDC27F 


00520 


CALL 


OUTPUT 




1 CALL THE OUTPUT ROUTINE 


7FB2 


18FS 


00530 
00540 , 


IP 


LOOP 




. THEN DO IT AGAIN 






00550 . 


3. 


rHF INPUT ROUTINE 








08560 . 










7Fe4 


DBEA 


00570 INPUT 
0O580 


IN 


A. ■ OEAH. 




. IS THE UART READY TO 
. REC I EVE A BYTE"' 


7FB6 


CB7F 


00590 


BIT 


7. A 




• CHECK BIT SEVEN TO SEE 


7FB8 


C8 


806OO 


RET 


2 




■ RETURN IF NOTHING THERE 


7FB9 


DBEfc- 


OO610 


IN 


A. ..8EBH- 




. LOAD BYTE INTO A REG 


7FBB 


28F7 


0O620 


-JR 


Z, INPUT 




■ IF ZERO. TRV ANOTHER 


7FBD 


CD3388 


0O63O 


CALL 


CRT 




OTHERWISE. DISPLAY BYTE' 


7FC0 


18F2 


0O64O 

OO650 


JR 


INPUT 




. THEN GET ANOTHER BYTE 






OO660 . 


4 


THE OUTPUT ROU . i 








08678 . 










7FC2 


CD2B88 


■ 8068O OUTPUT 


CALL 


KBD 




. CHECK THE KEYBOARD . 


7FC5 


B? 


O069O 


OR 


A 




. ANYTHING^"' 


7FC6 


:-: 


OO700 


RET 


z 




. NO- RETURN 


7FC7 


F5 


0071O 


PUSH 


AF 




- SAVE THE A AND F REGS 


7FC8 


DBEA 


00728 SEND 


IN 


A. •8€AH> 




i IS THE UART READY??? 


7FCA 


CB77 


80738 


BIT 


6. A 




. IF NOT, THEN 


.FCC 


28FA 


80740 


JR 


3. SEND 




. LOOP BACK 8 TRV AGAIN 


7FCE 


Fl 


0O75O 


POP 


AF 




. RESTORE M AND F PEGS 


7FCF 


c : ei 


O076O 


OUT 


• OEBH ■. A 




• OUTPUT BYTE TO UART 


7FD1 


C9 


0877O 
00780 
00790 . 


RET 






. AND RETURN TO LOOP 


7F90 




08888 


END 


START 




. END OF PROGRAM 


OO880 TOTAL 


ERRORS 










CRT 


0032 


OO200 00210 


O033O 


90358 0O630 






INPUT 7FB4 


O057O 00510 


O062O 


90640 






KBD 


8826 


00180 00680 










LOOP 


7FAC 


O051O 00530 










OUTPUT 7FC2 


O06SO 00520 










| SEND 


7FC8 


0O72O OO740 










1 START 7F90 


O029O OOS0O 











message for him awaiting 
retrieval. Signing on as "KLEM 
CADIDDLEHOPPER" defeats 
the whole purpose of bulletin 
board systems. 

Once you tell the system who 
you are, you can access the 
various functions of that par- 
ticular system. A summary of 
functions for the Forum-80 
bulletin board systems is given 
in Table 3. 

If, after calling the system, 
you get lost, press your 
RETURN key several times to 
get back to the FUNCTION 
mode. Then enter an H for 
HELP! This function explains 
how to use the system. If you are 
totally lost, enter a T or G or 
EXIT, while in the FUNCTION 
mode, and the bulletin board 
system will disconnect. 

Do not hang up on a bulletin 
board system! Although the 
software is, in many cases, writ- 
ten to handle the user who just 
hangs up, hanging up could 
cause a system crash putting it 
out of service for many other 
users! 

Conclusion 

In closing, if you have any 
problems communicating with a 
bulletin board system, consult 
your local computer club, bul- 
letin board SYSOP or computer 
store. All these sources are will- 
ing to help you. 

I would like to thank Bill 
Abney for information he provid- 
ed about Forum 80. I am thank- 
ful to Hank Damm and the guys 
at the Kansas City Radio Shack 
Computer Center for their sup- 
port.! 

Addendum 

In the last couple of weeks, 
there has been a substantial im- 
provement in the Forum 80 soft- 
ware. By the time this article is 
published, many Forum 80 sys- 
tems will be using this new soft- 
ware. Readers can now obtain a 
Forum 80 3.0 Users Guide, 
which describes in detail how to 
use the Forum 80 to the best ad- 
vantage, by sending a SASE 
with at least 30 cents postage 
affixed thereto to: 
3.0 Users Guide 
Forum 80 Headquarters 
7600 E. 48th St. Terrace 
Kansas City, MO 64129 



112 • 80 Microcomputing, May 1980 



u^PRINTROL^ 

for the TRS-80 1 LINE PRINTER - 1 

> FIVE SELECTABLE PRINT DENSITIES 

On* variable, from 10/ in to 22/ in (approximate! 
Four constant, user adjustable 

> TWO WIRES TO PRINTER CIRCUIT BOARD 



KIT - $59 

chock or money order 



+ 



ASSEMBLED -$89 

Pa residents, add 6% 



IpM^n^M^w^- 



THE HARDWARE COMPANY ^248 
5601 PENN AVE A23 
PITTSBURGH, PA 15206 

TRS-80* registered trademark of the Tandy Corp. 



1 
I 

I 

4 
I 






Space battle game with three 

dimensional viewing screen, 

graphics Jk sound. 

The ultimate in space 

battle games for the 

Level II 48K disk only. 

Requires one disk and 

is self loading. 



Money and cash orders sent 
out the same day. 



Fantastic Software 

3305 W. Spring Mt. Rd. 

Suite 49 ^224 

Las Vegas NV 89 1 02 



SOFTWARE CPU ,m 

MmMm Imp tmkttt Mri* m TW* 



See** »TE* Smote step/TRACE 'Disassembler lor TBUC. the 
successor ot TSTEP •nth the Matures at EMU. and more' 
Variable speed TRACE mode lets you run any Z80 machine 
languaQe program under total control, absolutely invaluable lor 
analysis or debugging 

• Disassemble: P°sts ZSO mnemonic in scrolling field 

• Single stepper drsplays selectable betore/atter 280 Prograrnming 
Models, stack elements and tag status. 

• Variable speed TRACE mode animates ZSO Models and 
Disassembler under dynamic user control. 

• Intelligent RAM Window Shows selected local RAM 
environments or user designated RAM area 

• Foreground/background breakpointing 

• implicit keypad includes Backspace. Relative space. Block 
RAM displays, local editing, taster # P and # l. CLEAR, more. 

• Super TLEGS relocates tor total address space access 

Direct or single step execution ot CALLS and RSTs, tuHy 
independent display suppression, big booklet ot instructions and 
examples Super STEP is a ZSO leflwere CN " 
1 6K Level II TRS 80, TBUG required No. BL0 $19 95 

EMU 02; Software emulation of the 6502 microprocessor TBUG 
displays byte. EMU takes it from there Now you can write, 
debug and execute 6502 programs m yew TM-M. 

• Disassembler posts 6502 mnemonic m scrolling held 

• Single stepper displays 6502 Processor Model, stack, flag 
status in before/after form. 

• 4 Speed TRACE mode animates 6502 models, activates a 
keyboard scan port accessible to 6502 instructions 

• Feat interpretive RUN mode lor rheaksbc execution 

• implicit keypad with Backspace. Relative space, more 

How to have a 6502 without having a 6502' Compare, contrast 
learn a powerful programming language distinct from ZSO or 
BASIC, read Apple, PET code. A 6502 leflwere CHI 1 " 1 
16K Level H TRS 80. TBUG required No BL 1 $24.95 

taper TIKI: Onboard relocate/ lor TBUG. TSTEP, Super STEP 
1 6K Level It TRS 80. TBUG required No LL S9 95 

TITO: Single stepper for TBUG totally reifies your ZSO 

1 6K Level II TRS 80 TBUG required No LL f it 1 95 

ALLEN GELDER SOFTWARE 
Box 1 1721 Main Post Office 
San Francisco, CA 94101 



include 75 each 
postage. CA add 6*-. 



require 

LI 



TRS 80. TBUG tm Radio Shack/Tandy Corp. 

Software CPU tm Allen Gekjer Software. 



W9 



LOWER CASE & GRAPHIC 

SYMBOLS GENERATOR KIT 

FOR TRS-80" CG 16 $94.50 



SrtVCDCrGHI JKLMHOPO«»TllVUXV?t.»»._ 
■ abcd*'9>>> > lfc«o»>.y »«u 'u.ijj, 1 1 ft 

• -.■-▼ .-.n^-ae : '• I iT.*.**** 

r-_T. '<®o n 11+ 

^~^-~J A W r S 1 IV '. ."» 



TRUE 2 LINE DECENOER LOWER CASE. ELECTRON- 
IC SYMBOLS THIN LINE GRAPHICS GAME SYM 
BOLS TEXTURED BACKGROUNDS AND MANY 
MORE DEMO CASSETTE IS INCLUDED 
FULLY ASSEMBLED WITH DETAIL INSTRUCTION 
FOR EASY INSTALLATION 

REOUIRES ELECT PENCIL TYPE L C MOD OR 
ORDER MEMORY AND SWITCH KIT SMK FOR $18 50 



SYNCHRONOUS DATA 
SEPARATOR FOR DISK USERS. 
SDS $34.50 

THE SYNCHRONOUS DATA SEPARATOR WILL 
ELIMINATE lOOSi OF THE SOFT READ ERRORS 
AND SPEED UP DISK ACCESS TIME BY ELIMIN- 
ATING RETRIES BY THE DISK CONTROLLER 

THE SDS PLUGS INTO THE DISK CONTROL- 
LERS SOCKET AND HAS ONLY TWO WIRES TO 
CONNECT NO TRACES HAVE TO BE CUT IT IS 
THE MOST RELIABLE AND ACCURATE DATA 
SEPARATOR AVAILABLE 

ADOS2 50FORS SH CALIF RES ADD6SSALE TAX 
SEND CHECK OR MONEY ORDER TO 

G.P. ASSOCIATES '** 
P.O. BOX 22822, SACRAMENTO. 
CA 95822 

TRS-80 IS A TRADE MARK OF TANDY CORP 



For Your 



TRS- 

80 

DUAL DISK-32K 
BUSINESS SYSTEM 



QUALITY 

DTI 
PAYROLL 

No. 410 

DATA TRAIN'S many years 
of small business computer 
experience in accounting pro- 
gram products brings to your 
business all of the quality fea- 
tures, functions, screen dis- 
plays, standard reports, user 
designed reports and operator 
reference manuals; allowing 
you to efficiently manage the 
payroll of your company. 

• 50 employees per mini-disk. 

• Runs in all states. 

• You maintain the P/R pro- 
duct without programing. 

• Flexible, easy to use. 

• No maintenence fees. 



$235. 

Product Info & 
License/Order 
Form. 

FROM... 




PHONE 

(503) 476-1467 

840 N.W. 6th STREET, SUITE 3 
GRANTS PASS; OREGON 97526 

Available Soon- 

• General Ledger Accounting 

• Accounts Payable 

• Accounts Receivable 

• Fixed Asset Accounting 

*Trademark Radio Shack. Div Tandy Corp 



* Reader Service - see page 162 
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UTILITY 



Got a fast 80? Use these 
modifications to speed up your DOS. 



FASTDOS 



Maynard B. Neher, Ph.D. 
Battelle Columbus Division 
505 King Avenue 
Columbus, OH 43201 



The August 1979 issue of 
Microcomputing (page 138) 
carried an article describing a 
simple modification which 
speeds up the TRS-80 by 50 per- 
cent.* However, the faster clock 
speed, 2.66 MHz, provided by 
this modification is incompati- 
ble with TRSDOS, the disk 
operating system software for 
the TRS-80. 

The problem is that the floppy 
disk controller chip requires a 
delay of at least 20 microsec- 
onds after an instruction is load- 
ed into the command register 
before the status register con- 

* The simple switch modification is not en- 
tirely satisfactory. Switching from one 
speed to the other (in either direction) 
causes the system to hang fairly frequently. 
At least two commercial speed change kits 
are available that avoid this problem. One is 
a switch operated modification, the second 
is operated by software. Three of our 
TRS-80s at Battelle use the commercial 
switch operated speed change kit. 



tains a valid status word. At 2.66 
MHz the system software pro- 
vides only about 15 microsec- 
onds delay. 

TRSDOS 2.2 or 2.3 can op- 
erate at the regular speed of the 
TRS-80 (1.77 MHz clock rate) as 
well as at the faster speed with 
certain changes. Two system 
modules require modification, 
the bootstrap loader (BOOT), 
and the resident system module 
(SYSO). TRSDOS contains no 
provisions for these software 
modifications. However, a 
monitor system for the TRS-80, 
RSM-2D, allows alteration of 
TRSDOS. RSM-2D is available 
from Small Systems Software, 
Newbury Park, CA. Any system 
that permits disk modifications 
without regard for the protec- 
tion status of the modules could 
be used. 

Following the instructions, 
provided with the RSM-2D 
monitor load a copy of RSM-2D 
on your TRSDOS disk and ex- 
ecute it. You can also load RSM- 
2D and execute it directly from 
the RSM disk and then the 
TRSDOS diskette can be in- 
serted into the drive. RSM-2D 
will operate only at 1.77 MHz. 

BOOT Modification (Sector 0) 

Load BOOT with RSM's load 



command at address 5000: 

None of the other system 
modules (SYS1 to SYS6) include 
any disk I/O and consequently 
do not require any changes. 



However, two system utilities, 
BACKUP and FORMAT will not 
operate at the faster clock 
speed. So far, I have not been 
able to modify them even when 



L 5000 1 (BOOT is in Sector 0) 


Use RSM's EDIT command to alter locations according to Table 1 


Local km 


Old Contents 


New Value 


5091 


F1 


EE 


50BB 


F5 (PUSH BC) 


CO (CD (CALL 42F9) 


50BC 


F1 (POP BC) 


F9 


50BD 


F5 (PUSH BC) 


42 


50BE 


F1 (POP BC) 


00 (NOP) 


S0EO 


54 T 


0DCR 


50EE 


45 "E" 


17 


50EF 


40 "M" 


Eft 


5OF0 


0D "CR" 


44-0" 


50F1 


17 


49 "1" 


50F2 


E8 


53 "S" 


50F3 


44 "D" 


4B "K" 


50F4 


49 "I" 


20 "Space" 


50F5 


53 "S" 


45 "E" 


50F6 


4B "K" 


52 "R" 


50F7 


20 "Space" 


52 "R" 


50F8 


45 "E" 


00 "CR" 


50F9 


52 "R" 


C5 (PUSH BC) 


50FA 


52 "R" 


06 (LD B. 08H) 


50FB 


4F "0" 


08 


50FC 


52 "R" 


10 (DJNZ $-2) 


50FD 


0D "CR" 


FE 


50FE 


EB Garbage 


C1 (POP BC) 


50FF 


5F 


C9 (RET) 


Finally, write the modified BOOT back to the disk using RSM's save command: 






$0 5000 1 




Table 1 


BOOT Modification (Sector 0). 
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inserting delays where appar- 
ently needed. I would appreciate 
hearing from anyone that is able 



to find the key "append-to," mak- 
ing these routines operate at the 
faster clock speed ■ 



SYSO Modification (Sector* 5- 19) 



Load SYSO inlo memory at 5000 using 
RSM's load command: 



L55000 15 



Use RMS's EDIT command to modify 
locations according to Table 2. 



Location Old Contents 


New V.lue 


51EC 1C 


F3 (Dl) (Delay Subroutine) 


51€D 1F 


C5 (PUSH BC) 


51EE 1E 


06(LDB. 10H) 


51EF 1F 


10 


51F0 IE 


10 (DJNZ $-2) 


51F1 1F 


FE 


51F2 1E 


C1 (POP BC) 


51F3 1F 


C9 (RET) 


5293 C5 (PUSH BC) 


CD (CALL 45F3) 


5294 CI (POP BC) 


F3 


5295 C5 (PUSH BC) 


45 


5296 F3 (Dl) 


C5 (PUSH BC) 


Write the modilied code back to disk with RSM's save comrr 




S55000 15 


Table 2 SYSO Modification (Sectors 5-19). 



g WtfttWHHHMtlH IMHHMWHMWtWHHtWII 



TRS-80® CP/M® & CBASIC® 
BUSINESS SOFTWARE 

LOW-COST MOD II DISK EXPANSION 
. . . over 610.000 bytes/disk with our 
CP/M . . . plus many other features. 

Find out why ours is the Better Business Buyl 

Model II CP/M (rel. 2.0) $250.00 

Model I CP/M (re. 1.5) 150.00 

CBASIC 95.00 

APH (Automated Patient History) 1 75.00 

RESIDENTIAL PROPERTY ANALYSIS 

system 300.00 

MAGIC WAND® Word Processor .... 400.00 
RM COBOL® (Z80 code) 750.00 

Osborne & Assoc. CBASIC source programs — 

O&A Payroll w/Cost Accounting $250.00 

O&A Accts. Rec./Accts. Payable . . . 250.00 
O&A General Ledger w/Cash Journal. 250.00 
O&A CBASIC books for above (each) .... 20.00 

Send 30C SASE for CP/M Users Group software 
list & free "CP/M Primer". 




CYBERNET 



C S 



(714) 848-1922 



3 C 

2 8041 NEWMAN AVENUE • SUITE 208 • HUNTINGTON BEACH C ALIFORNI A S2647 

I IW»4HHWIHIHMIfHiffliiUII«(UMUIMIIWIHIUMUIIIIIUiHiliitlNHiin» 




10% 

DISCOUNT 
Off 
List 

64 K l Drive 

$3499.00 



AUTHORIZED 

Radio /haetfo.. 



AMI 



COMPUTER SPECIALISTS 



Popular 16K Level 1 1 System $ 722.00 

26-1145 RS 232 Board 84.00 

26 1 140 "O" K Interface 254.00 

26 1 160 Mini Disk 424.00 

26-1 171 Telephone Modem 169.00 

Fast 100 CPS Centronics 730 Printer 750.00 

Highly Reliable Lobo 5V 4 " Drives 375.00 

Versatile Lobo Interface, 8" Drives 

and IMI Hard Drives Call For Prices 




15% 

DISCOUNT 

Off 

List 

4K Level II 
$527.00 



No Taxes on Out Of 
State Shipments 

Immediate Shipment 
From Stock. 



MICRO MANAGEMENT SYSTEMS, INC. 
DOWNTOWN PLAZA SHOPPING CENTER 

115 C SECOND AVE. S.W. 

CAIRO, GEORGIA 31728 
912-377-7120 



f!2 



Full Factory Warranty 
on All Items Sold. 

VISA, Master Charge 
and COD's, Add 3% 



^Reader Service- see pig* 162 
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UTILITY 



Use this elegant program to help design 

video layouts and utilize them in your programs. 



Etch-A-Screen 



James K. Shrum 

4318 Pathfinder Avenue 

Cheyenne, WY 82001 

Though graphic displays are 
one of the most interesting 
attributes of personal micro- 
computing, producing them on 
a TRS-80 from scratch can be an 
exhausting exercise in frustra- 
tion. 

First, you must plot the dis- 
play on the planning worksheet, 
construct equations for the 
proper locations, formulate the 
FOR-NEXT loops, write the pro- 
gram statements. Run them . . . 
adjust them. Run tne program 
again . . . readjust it. Run it once 
more . . . still more readjust- 
ments . . . There's gotta be a bet- 
ter way! 

There is! Remember the chil- 
dren's toy on which you drew 
pictures by turning knobs? With 
a little bit of effort, we can con- 
struct a Level II BASIC program 
that will do that and even more. 
It will give us real-time keyboard 
control of the graphics func- 
tions, let us mix text with graph- 
ics, and save patterns on tape 
for recall and redisplay at any 
time. 

Floor plans, circuit diagrams, 
maps— whatever you do that 
can use computer graphics, can 
be done much more easily with 
the program we are going to 
construct. 

The program is divided into 
four major modules: drawing, 
text, tape save and tape load. 
We'll complete one module at a 
time, merging each one with the 
previous ones. Finally, we'll con- 
dense the program to make it 
usable on a 4-K machine. 



The Drawing Module 

Let's write this program to 
simulate a cursor that the user 
can control simply with five 
keys: the space bar and the four 
arrows. As the cursor moves in 
an arrow direction, we want to 
leave it a line behind to show its 
trail. The space bar must move 
the cursor without drawing a 
line, and be able to erase a pre- 
vious line. Finally, by using two 
arrows at once, the cursor must 
move diagonally. 

The first trick is to input our 
program. The INKEY$ function 
won't cut it, since it only ac- 
cepts input from a single key at 
a time. What we have to remem- 
ber is that the TRS-80 keyboard 
is memory-mapped to the CPU. 
In other words, the CPU "sees" 
the keyboard as a section of 
memory not as an I/O device. 
The memory map in the owner's 
manual, tells us that the CPU 
sees the keyboard addresses 
14336 to 15359 decimal. 

BASIC can also access these 
addresses, using a PEEK. 

If you run Program 1 you can 
see what goes on in those mem- 



ory addresses as various keys 
are depressed. 

The resulting numbers don't 
look much like ASCII, but don't 
worry about that. The CPU gets 
ASCII by scanning the keyboard 
in two dimensions and interpret- 
ing the results. What we want is 
the raw data in the memory with- 
out the CPU's translation of it. 
By using the two lines in Pro- 
gram 2, we'll see what we have 
to work with. 

Look at the labeled sample 
run. A unique number Is present 
In memory address 145990 each 
time an arrow key, the space 
bar, or any combination of two 
or three of these is depressed. 
With a PEEK followed by appro- 
priate decision statements, we 
now have the foundations of our 
drawing module. (Note: Al- 
though I used memory address 
14590, there's nothing very 
special about it. A number of 
others would serve equally well.) 

Building the Draw Module 

Now we can build the drawing 
module itself, shown expanded 
in Program 3. Not too formid- 
able looking, but very effective. 



Let's take a close look at it and 
see how it operates. 

We start with a clear screen in 
line 10. Line 20 takes whatever is 
in 14590 and calls it B. We want 
to do a little checking of B to pre- 
vent the computer from taking 
any action if we give it a strange 
command such as "move the 
cursor up and down simultan- 
eously." In addition, if the space 
bar alone is depressed, we want 
line 20 to immediately branch 
program execution to the step 
that displays the current cursor 
location. 

If we make it past these tests, 
lines 25 through 60 check for a 
depressed arrow, by testing all 
of the possible values we found 
with Program 2. If an arrow key 
is depressed, we adjust our cur- 
sor location accordingly, by 
changing the values of X and Y. 
Since X (the horizontal coordi- 
nate) must fall between and 
127 and Y (the vertical coor- 
dinate) must fall between and 
47, their values are checked. (If 
the end portions of these state- 
ments look a little odd, it is be- 
cause I used implied THEN 
statements quite a bit.) 



10 FOrt l=1433b' TO 16639 



PHI NT I ; PEEK( I )» 



NEXT 



14444 


128 


14444 


1b 


14440 


fcj 


144b2 


12b 


14466 


4 


14460 


128 


14464 






14441 128 

14446 16 

14449 k) 

14463 128 

14457 1 

14461 64 



14442 

1444b 
14450 
14454 
14458 
14462 



32 

16 

128 

128 





14443 
1444 / 
14451 
14455 
14459 
14463 



J2 

1o 

128 

128 

64 



Program 1. In this sample run, the five-digit numbers are the memory addresses and the smaller 
numbers next to them are the contents of each address. The numbers were put into those ad- 
dresses by randomly pressing keys during the run. 
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The updated cursor location 
is displayed with line 70. State- 
ment 80 then checks the space 
bar. If it is depressed, we enter a 
short delay loop to give the cur- 
sor time to show us where it is, 
then turn the cursor off. Line 90 
repeats the entire module. 

Let's see how this module op- 



erates. Enter the statements 
and RUN. The screen will go 
blank. Press and hold the space 
bar and a spot in the upper left 
of the screen will begin blinking. 
That is our cursor in its starting 
location. 

Now, while holding the space 
bar, press and hold the right ar- 



14 PRINT PEEK ( 14594) ! 
20 GOTO 10 








8 8 8 


UP ARKOi 

8 8 8 6 8 


8 8 






16 


II 


004N ARROi 
16 16 16 16 


16 16 16 


Id 




64 


04 


RIGHT *KR0« 
64 64 64 64 


b4 64 64 


64 




32 


ja 


LEFT ArfhO. 
32 32 32 32 


32 32 32 


32 




128 


12d 


SPACE JA* 
128 128 128 


128 128 


128 


128 128 


24 


24 


UP AND 004N 
24 24 24 24 


24 24 24 


24 




16 


ab 


RIGHT ANO LEFT 
96 96 96 96 


96 96 96 


96 




n 


72 


UP ANO RIGHT 
li 72 1Z 72 


72 72 72 


72 




40 


4tf 


JP ANO LEFT 
40 40 40 40 


44 44 4ri 


44 




80 


3B 


OOMN ANO RIGHT 
44 00 80 84 


60 84 84 


e>4 




48 


48 


D4«N ANO LEFT 
48 48 40 40 


46 48 46 


43 




136 


13b 


UP Ml TH space 
136 136 136 


136 136 


136 


136 136 


144 


144 


00«N 41 TH SPACE 
144 144 144 


144 144 


144 


144 144 


192 


lii 


WIGHT * I T m SPACE 
192 1*2 192 192 192 


192 


192 192 


16* 


lag 


LEFT » I T h SPACE 
1o4 164 160 160 164 


160 


160 160 


200 


244 


JP ANO RIGmT tfl TH SPACE 
200 200 200 200 200 


200 


244 240 


tea 


103 


UP AND LEFT al 
166 168 168 


H SPACE 
168 168 


168 


166 168 


208 


246 


OOlN ANO RIGHT 
208 208 200 


■1 TH SPACE 
208 206 


288 


208 208 


lit 


W6 


004N ANO LEFT 41 TH SPACE 
17b 176 176 176 176 


176 


176 176 


Program 2. This program watches memory address 14590 
decimal and shows us continually what is in that location. 
The labels tell what keys were pressed during each portion of 
the run. For instance, UP AND BIGHT WITH SPACE means 
that the up arrow, the right arrow, and the space bar were all 
depressed simultaneously. 



QM0R0FO Rffl\A TTERRBGCYPQGZIVJBPCEB 
S H N B T X A XW REEIDEASEEDSRPVYXXON 
VLTWGYROS &\ff\E DPVJKLMRHECTVXHNAFH 
BJELFEQAZG ZV\P CRYPTOUPZAXZQJEJTS 
ZDQINKFSNA GMi GFJSEYWTVNPFJVZVC 
BVLFGULMNSNE iNXt TSCYMBCGWBQOFMPO 
U0VZKBFI6EPUY A\^E XMOLERZJXACHYRU 
PKBHYUCWOCGLDMRXSEWMCZTIONGULYK 
ZMHOUPXBLKACAPJJUKBFLIPCNEFQAFE 
JHTAYCJGWHETMNHAQZQJLOWERCASETH 
HRSSKVCDGCBOAPTGTHTXTPMLEILRETQ 
EYINDLXXCBCYXDZHOPRYVYPRVADNTOL 

FREE IDEA SEEDS f" 
Have you ordered yours? If not, you better reconsider. More 
than 5660 happy subscribers think you don't know what you »v 
missing. These are FREE programs for your TRS-80 and all you 
have to do to get then is send us a legal size SASE. That Is 
all there Is to It. Slmp1e7 You betl Every month there's a 
new program and you really don't want to miss any of then! 
When you stop and think about it there are only three ways to 
build your software library. One way is to write the program 
yourself. Another way is to purchase programs. The best way 
Is to have the programs given to you and that Is Just what we 
are doing I All FREE IDEA SEEDS are our own original programs 
and we want you to have them to use, rewrite, and expand. 
Send your legal size SASE to: 
CECDAT, Inc. ^ 6 2 PO Box 8963 Moscow, ID 838^3 



VERBATIM® ATHANA® GEORGIA MAGNETICS® 

Floppy Diskettes for 

ANT COMPUTER SYSTEM 



8 " Floppies only $3 

10 for $3.65 ea • 50 for $3.40 ea 



20 

ea. 

HUNDRED LOTS 



Wa reserve the right to ship either ol the name brands that we carry. 
ft 



5V4 Mini-floppies only $2 

K,NDfiE~ . 

10 for $3.10 ea • 50 for $2.85 ea 



00 

ea. 

-wNDfiEr _C T S 



SPECIFY SIZE, TYPE, A COMPUTER 

HI * Soft Sector. 10 Sector. 16 Sector— a" IOM Compatible. Herd Sector 



CALL TOLL-FREE 24 HRS. TO ORDER 

800-824-7888 
OPERATOR 814 



Schools and 
unlvnrsltln* 




CALIFORNIA 800-852-7777 oi.diy .•rvic.d C.O.D 



DC SOFTWARE & COMPUTER PRODUCTS 
POST OFFICE BOX 503 
SAN BRUNO, CALIF. 94066 

FOR INFORMATION 415-348-2387 



• 59 
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SBm svsiEms, inc. 



>^154 



Computer Services • Hardware • Software • Consulting 

Professional Business Software to operate on 
TRS-80* computer 

• ISAM Accounting Package: 

- Accounts Payable, Accounts Receivable, 
General Ledger with Cash Journal, In- 
voicing and Payroll 

Integrated Accounting System $425.00 

Separate Modules $ 99.00 

• ISAM Inventory Control $125.00 

— Above Systems require 2 - 3 drive Systems. 

— Integrated System requires 3 - 4 drive Systems. 

— Systems operate under NEWDOS by Apparat 
(not included) 

• Machine Language Disk Sort $ 49.95 

- Multiple Keys - Ascending, Descending 
Callable under Basic 

TO ORDER CALL: 




masiei narge 



VISA 



(617) 685-0151 



* Trademark of Tandy Corporation 

•* Accounting Package not available in the State of California. 




TRS-80*— CONDENSE 

The Ultimate in BASIC 
Compression Utilities ^l. 

* RiImsi 1.3 Now Available '* ^W 



Write BASIC programs using single statement lines for ease 
of maintenance. 

Write BASIC programs with unlimited remarks and comments 
to improve program readability and documentation... 

— AND STILL GET — 
OPTIMUM USE OF MEMORY — FASTER PROGRAM 
EXECUTION 

Compresses programs up to 70% of original size 

Improves execution time by as much as 30% 

Creates multiple-statement program lines 

Blank compression 

Remark and comment deletion 

Renumbers GOTO. GOSUB, THEN, ELSE, and RESUME 

statements which reference deleted line numbers 

PLUS THESE NEW USER REQUESTED OPTIONS: 

- Retention of low numbered remark statements 

- Checkpoint / Restart Facilities 

- Phase 1 work file 



Moil! I $21.95 

(Diskette) 



Model II $24.95 

(Diskette) 



INTERNATIONAL SOFTWARE ASSOCIATES 

P.O. Box 14805 

Omha. No. 68124 



^187 



Tandy Corporation" 



row and the cursor will move to 
the right. While the cursor is 
moving, release the space bar 
and a solid line will be drawn to 
the right. 

Experiment by pressing all of 
the arrows, both alone and in 
combination with the space bar. 
Hold the right arrow and the 
down arrow depressed together, 
and you'll draw a line diagonally 
down and to the right. 

To erase an unwanted line, 
just position the cursor and 
move it in the desired direction 
while holding the space bar 
down. Much easier to use than 
describe, isn't it? 

With this module operating, 
we can draw whatever we want 
without the trials and tribula- 
tions of constructing equations 
and loops and putting them into 
program statements. 

Experiment with the keyboard. 
While this module operates, cer- 
tain other keys also give us valid 
input. For instance, the W key 
sends the same signal to our 
memory address as the space 
bar, and there are several other 
duplications as well. 

The Text Program 

Now that we have our com- 
puter drawing pictures for us, 
let's construct a module for text. 
The text module allows us to 
display alphanumeric charac- 
ters on the screen with our draw- 
ing. With it we can add labels or 
captions. This may be a nano- 
trif le more involved than the pro- 
ceeding, so hang on. 

Program 4 is the expanded 



listing of our text module, along 
with the two changes and one 
addition we have to make to the 
drawing module so they can 
work together. 

First, we need a decision 
statement so the computer 
knows when to stop drawing 
and start displaying characters. 
We can use the INKEY$ function 
for this. If you played with the 
keyboard while drawing, you 
found out we can't use W for 
write, or T for text or P for print, 
because all of those letters put 
valid numbers into our memory 
address. That's why our new line 
15 now checks to see if D for 
"done drawing" is pressed. If it 
is, we branch to text. Since this 
line slides in at the very begin- 
ning of drawing, we have to 
change lines 20 and 90 to refer- 
ence the new line 15. 

We start the text module by 
assigning values to the vari- 
ables we will use in line 100. "A" 
will be the screen memory ad- 
dress used for our cursor loca- 
tion. If you look again at the 
memory map, you'll see that 
memory addresses 15360 
through 16383 control screen 
display locations through 
1023, with 15360 being the upper 
left corner. We assign the value 
of 191 to variable C. This is the 
code number for a full graphics 
block and we will be using it as 
our text cursor. 

Now comes the meat of the 
module. Line 110 takes what- 
ever is currently being displayed 
at screen location A and saves 
that character's code number as 
variable D, then replaces it with 



CHANGE LINE Mi 
lio CLEAR \ibti » DIM SJ( 1b) 



CLS 



CHANGE LINE Hi 
Ut) Bf = I NrtE Y* : IKdt = " M TMEM^'<5 ' ••• CHECK FOR INPUT 

uDD LINES 1<J2 THROUGH liS 
102 IFdS = "T'THENia8L ••• GOTO TEXT ROUTINE 
ltfj I Fs* = "S M THEN20« '.. ••• GOTO SAVE ROUTINE 
K4 IFd$ = "L"THENbt}k5' ••• GOTO LOAD ROUTINE 
1k>5 bOTO 1M1 ••• UNACCEPTABLE-TRY AGAIN 

OLD LINE lit dECOMES 148 
143 A=15J6«:C=1i1 

OLD LINE 200 HEC0«ES 190 
190 GUT0 11B 

Example 1. These are the changes we need to make to our 
growing program so that we can add the tape save and load 
modules. 
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our text cursor. We want to save 
D so we can reconstruct our dis- 
play when we move the cursor to 
a new location. 

Line 120 checks for a pressed 
key. If there are none, we blink 
the cursor to show us where it is 
and then check again for a key- 
press. 

If a key has been pressed, we 
go to line 125, which gives us the 
ASCII code for that key and as- 
signs it variable B. 

Line 140 is our escape hatch 
from the text module. If the key 
we pressed was ENTER, our dis- 
play is restored to its original 
form by returning D to location A 
and we are returned to drawing. 

If not, line 140 checks for a 
pressed alphanumeric by exam- 
ining the ASCII value. If so, it is 
displayed at the cursor's current 
position and the cursor is ad- 
vanced by adding 1 to A. At the 
end of the line, we make sure 
that the value of A remains with- 
in the permissible limits so we 
don't go POKE somewhere we 
shouldn't. 

Lines 145 through 180 check 
for an arrow key. If a right or left 
arrow was pressed, we adjust 
the value of A by 1 to move hori- 
zontally on the same line. For 
the up and down arrows, we use 
an adjustment of 64, to move us 
in a vertical line. 

After each use of an arrow 
key, we must ensure that the val- 
ue of A is still within the limits, 
and we replace the character we 
took out of that location to dis- 
play our cursor. This way, we 
avoid leaving a trail of destruc- 
tion across the screen. 

The Return Trip 

Finally, line 200 sends us 
back to the beginning of the 
module to repeat the process. 

Like the drawing module, this 
portion of our program is much 
more easily used than ex- 
plained. Once the two modules 
have been combined, draw your- 
self a picture. After you're done, 
tap the D to tell the computer. A 
large block of light will appear in 
the upper left corner of the 
screen and blink. 

Now, use the arrow keys to 
move the cursor to the desired 
location on the screen. Because 
we are using IN KEYS, each sepa- 
rate key press moves the cursor 



b HEM ••• TRS-00 "t TCh-a-SCREEN" HftT 1979 RY j.rf. Sh*U" ••• 

W CIS 

lb REM ••• UP t D0«N OR LEFT I RIGHT TOGETHER ARE INVALID ••• 

lb REM ••• SPACE BAR ALONE JUMr-'S TO CURSOR FLICKER ••• 

20 8*»*EEm< 14598)« IF B=i OR 8 = 24 OR 8 = 9b IhEN 24 ELSE IF d = 12B I HE V 14 

2b REM ••• CHECK FOR UF- ARROa ••• 

it IF 6 = 6 OR 6 = 48 OR 0=72 OR 3=13b OR B= Ifed OR 8 = 2tf« T=T-1:IF T<0 1 = 

j§ REM ••• CHECK FOR DO0N tHHOt • •• 

44 IF 8=lo OR 8*48 OR 6*88 OR 8*144 OR B«17i OR 8=288 Y*Y*1:IF Y>4/ Y=4/ 

O REM ••• CHECK FOR LEFT ARRQ0 •"• 

50 IF 6 = 32 OR 0*40 OR 8 = 48 OR 6=1b8 OH B*1b8 Oh 6=1/b X«X-ll|F »<» X = 

5b REM ••• CmECk FOR RIGHT ARROn ••• 

b0 IF B = 64 OR 8=72 OR 6*88 OR 6=192 OR 8*208 OR B=2*8 X*X*1»lf x>12/ X=127 

U SET (mr) 

/a RE* ••• IF SPACE 8AR DEPRESSED" ERASE ••• 

611 IF d>0b FOh 1 = 1 TO fifAJCXf IKESE1 (XtT) 

98 GOTO 28 

Program 3. Expanded listing of our drawing module. 



A0D LINE lb 
lb IF INKET$ = "D" THEN 160 



CHANGc LINE 14 
It a* PcEK(14590)s IF 6=4 OR B=24 OR 6=9b THEN IS ELSE IF 8*128 THEN 78 



CHANGE LINE 44 
i4 GOTOIb 

LISTING FOR LTtXT'_ MODULE 

*b REM ••• THIS PART OF PR06* ADOS TEXT ••• 

46 REM ••• SET VARIABLE VALUES ••• 

188 A*l9J60 < C=191 

18b REM ••• SAVE CURRENT GRAPHICS CHARACTER ••• 

118 0= PEEK(A):POKE A»C 

lib REM ••• GET KE T FROM KET8GARD AND FLICKER CURSOR ••• 

128 b*= INKEYiMF 3» ="" POKE A»32» FOR 1=1 TO T0> NEXT* POKE t . i SOTO 118 

123 REM ••• Gel ITS VALUE ••• 

123 d=ASC(8$) 

126 REN ••• IF CH. -- RET. TO ORAMlNG ••• 

130 IF 8= U POKE A»0i6010 15 

13b k£M ••• CHECK FOR ALPHA CHARACTER ••• 

14* IF o >4^ AND a <91 POKE A»qiA=A*1i IF A >16383 A*1o383 

14s rt£M ••• CHECK FOR LEFT ARRO0 ••• 

lot IF 4-6 POKE A»D: A«A-l: IF A < 15360 A*1S360 

Ibb KEN ••• CHECK FOR RIGHT ARRO" ••• 

100 IF 6*6 POKE A.Q: A*A»l: IF A >16363 A=16383 

Ibb REM ••• CHECK FOR OOiN ARRO0 ••• 

)<4 IF 8=18 POKE A»D i A = A *64 : IF A > 16363 A=A-64 

1/3 Hi* ••• CHECK FOR UP ARRO0 ••• 

100 IF 8=91 POKE ftlOl A*A-64: IF A <153o0 4=A»64 

200 GOTO 110 * ••• DO IT AGAIN ••• 

Program 4. The top three program lines are the changes necessary to interface the text and draw- 
ing modules. The text module itself is listed in expanded form below them. 



one step. Notice that you can 
move the cursor right through the 
pattern on the screen without 
damage. In addition, since the 
screen display is controlled by a 
single block of memory, we have 
automatic "wrap-around" from 
one line to the next, moving both 
right and left. 

After the cursor appears 
where it's desired, simply type in 
your label or message. The let- 
ters or numbers will be placed in 



the cursor's position, and the 
cursor will move right one 
space. The captions on the 
screen will be unaffected by the 
cursor's movement, so to re- 
place something, just reposition 
the cursor and type over it. To 
erase, position the cursor and 
hit the space bar. 

Notice that characters will 
erase portions of our pattern at 
times. That is why we used a full 
graphics block as our cursor. 



The block delineates each char- 
acter location's boundary so we 
can see what we are going to 
erase prior to actually doing so. 

Make a mistake? Erase some- 
thing you didn't want erased? 
No problem. 

Hit ENTER and you will be re- 
turned to drawing so you can 
touch up or change the display, 
in fact, you can alternate at will 
between drawing and text by us- 
ing the D and ENTER keys. 
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211 

21c. 
il* 
IS* 

lAt 
250 

lit 

lid 
2aa 

J00 

310 

J2k) 
3 Jvd 
J40 
J:>0 
Job 
3 ti l<! 

j/« 

jy0 

400 
410 
42b 
430 



REM 

REM 

FOR 

FOR 

FOR 

SS( I 

POKE 

NEXT 

RE* 

FOR 

Si (I 

NEXT 

REM 

CLS 

PR IN 

PKI N 

PRI N 

PkIn 

REM 

PRI* 

PKl N 

PRIN 

PR I N 

PRIN 

PRIN 

GOTO 



TO 1 

TO 1 

TO 6 

= SJ( I) 

S360*l« 



= TO 
= » ■ « . 



) = 



s PRI 
T "LO 
T : P 
T : PKI 

T "RE 

T *- I 

T »-1 

T »-1 

T *-1 

T #-1 

T #-1 
b/0 



5 ' 
i ' 

+ 

64* 

* C 

• • 

1b 

s$ 



SAVE ON TAPE ••• 

CONSTRUCT THE STRINGS ••* 
S$(l) «= M " : NEXT ■ ••* BLANKS THE STRINGS 
*•• VERT LOOP 
••• HORI2 LOOP 
CHR$( PEEK( 1 5360+ I *b4+ J )) ' ••• AQOS NEXT CH* 
Jt42 '. •♦• SHOW WHERE WE ARE 
LOSE THE LOOPS 
ADD ASTERISKS •«• 



I) 



••* PRINT THE PROMPTS ••• 
NT CHR$(23) 

AO CASSETTE « POSITION 
HINT "DEPRESS 'RECORD' 
N T l PR I NT» PRINT* INPUT" PRESS 
CORDING" 

•*• POT STRINGS ON TAPE ••• 
tSS(0)»SS( 1).St(2) 
•Sf(3).S*(4)»S$(5) 
»S*(6)»S*(7)»SS(8) 
»S$(9)»S$( l0)tSS( 11) 
• S$( 12)»S$( 13 ) • SS< 14) 
»S$( 1b) 
' ••• REDISPLAY PATTERN & RETUWN T 



TAPE" 

AND 'PLAY' KEYS" 

ENTER' WHEN READY";Z 



IRA if I N 3 



Program 5. Expanded listing of our save module. 



5019 REM 


••• LOAO FROM TAPE ••• 


5 1 id REM 


••• PRINT THE PROMPTS •*• 


520 CLS t 


PRINT CHR$(23) 


530 PRINT 


"LOAD CASSETTE AND POSITION TAPE" 


540 PRINT 


: PRINT "DEPRESS 'PLAY' KEY" 


550 PRINT»PRINT*PRINTIINPUT"PRESS 'ENTER WHEN READY";Z 


560 PRINT 


"LOADING" 


t>/9 REM 


••• BLANK THE STRINGS ••• 


580 FOR 1 


= TO 15 


590 Sf (1) 


- >> 


600 NEXT 


' ••• NO* READ THE TAPE ••• 


610 INPUT 


#-1»S$(0)»S$(1).S$(2) 


620 INPUT 


#-1»S$(3)tS$(4)tS$(5) 


630 INPUT 


»-1»S*(6)»S$(7)»S$(8) 


640 INPUT 


#-1»S$(3)tSJ(10).SI( 11) 


650 INPUT 


»-1»S*(12)»SJ( 13)»Si(14) 


660 INPUT 


*-1»S$( 15) 


665 HEM 


*•• GET RID OF ASTERISKS »** 


670 FOR 1 


= TO Tb" 


680 SS( 1 ) 


= MDS( S$( 1 )»2#64 ) 


690 NEXT 




700 REM 


••• DISPLAY 1ST 1b LlNtS *•• 


705 CLS 




710 FOR 1 


= TO 14 


720 PRINT 


st(i); 


730 NEXT 




/40 REM 


*•• PRINT 1ST fcJ CMH OF LAST ••• 


750 PRINT 


LEFT$( S$(15)»63 ) ; 


760 REM 


••• SHOW LAST CHR ••• 


770 POKE 


16383- ASC( RIGHTS( S$(15)»1 )) 


780 GOTO 


15 <_ -•• RETURN TO DRAWING 


Program 6. Expanded listing of our load module. 



Once your pattern is com- 
plete and labeled, just toggle 
your screen printer for a hard 
copy of your graph of monthly 
sales or your picture of a clown. 

Tape Considerations 

Now that we have the drawing 
and text modules making pretty 
pictures for us, we have to have 



some way of saving them. We do 
have a method of saving data on 
tape, but problems arise using 
the PRINT# statement the easy 
way: 

10 FOR I = 16360 TO 16383 
20 PRINT #-1. PEEK (I) 
30 NEXT I 

This program does indeed 
work, but if you decide to try it, I 



have to suggest using a 
loooooong cassette, because it 
will take between 60 and 70 min- 
utes to output all of the screen 
data. 

The tape I/O format causes 
delays. Each separate PRINT* 
statement must turn on the cas- 
sette recorder, output a carrier 
tone and add a string of 128 



leader bytes to a synch byte 

prior to actually transmitting the 
data called. Each print state- 
ment takes just over four sec- 
onds to execute and there are 
over a thousand bytes of screen 
data to record. 

All hope is not lost, though. 
Each PRINT* statement can 
handle up to 255 bytes of string 
data. At a transmission rate of 
500 baud, that only lengthens 
the execution time of a PRINT# 
statement by a little more than 
half a second. If we can struc- 
ture our screen memory into five 
or six strings of characters, we 
can record all of the data in less 
than forty-five seconds. Sound 
better than taking an hour? 

Example 1 shows the pro- 
gram changes and additions we 
have to make in our previously 
completed modules so that we 
can add our upcoming save and 
load routines. 

Our new line 10 gets us ready, 
by reserving space for the 
strings we will be constructing. 
S$ is a sixteen element array (re- 
member, S$(0) is a usable ele- 
ment), so each element will han- 
dle one line of the screen dis- 
play. This method makes our 
programs easier to handle and 
to troubleshoot. 

Line 100 is changed because 
we will have three options from 
which to choose after typing D 
for done drawing. Our new line 
100 will wait for us to decide and 
then accept input from us with 
INKEY$. 

The new lines 102 through 104 
then branch us to the appropri- 
ate module. We'll continue to 
use T for text, and add S for save 
and L for load. If none of these 
letters are entered, line 105 
sends the computer back to line 
100 to give us another chance. 

Set the variables that text 
uses in line 108 and move our 
old line 200 to line 190, so we 
can start our save module at line 
200 (no special reason— I like to 
use round hundreds for starting 
lines during program develop- 
ment). 

Save Module 

The save module is shown in 
expanded form in Program 5. It 
looks relatively simple, but it ac- 
complishes quite a bit. 

First of all, we have to clear 
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our string array in case it has al- 
ready been used. Line 215 does 
this by making each element of 
S$ a null string (" "). 

Lines 220 and 230 then set up 
the nested loops we will use for 
building the strings from the 
screen display. The loop in- 
dexed by I will take each line on 
the screen from top to bottom, 
while the J loop covers each 
character position on the I line 
from left to right. 

Line 240 looks complex, but 
isn't as bad as it may appear. It 
merely takes the S$ array ele- 
ment addressed by the I loop 
and adds the characters on that 
screen line. Since there are 64 
characters per line, multiplying I 
by 64 puts us at the beginning of 
each new line every time I is in- 
cremented in the loop. Adding 
the value of J will move us from 
left to right and adding 15360 
puts us into the block of mem- 
ory controlling the screen dis- 
play. PEEK gives us the code at 
that address, and CHR$ gives us 
a character we can add to our 
growing string. 

I dislike programs that run on 
without letting me know that 
something is happening, so line 
250 displays an asterisk each 
time a character is added to our 
S$ array element. This way we 
can watch the progress of our 
string building. 

Finally, line 260 closes both 
our loops. 

Lines 230 through 300 solve a 
problem that had me baffled for 
some time. Prior to adding these 
lines, I would lose characters 
from my strings after saving and 
then reloading them. S$(0) had 
64 characters as it was sup- 
posed to, but each one following 
had fewer until S$(15) ended up 
with about 45 or so. Needless to 
say, this resulted in some in- 
teresting displays. I discovered, 
by trying different display pat- 
terns, that strings did not reli- 
ably transfer to tape if they be- 
gan and ended with a blank 
character (a space). Lines 280 
through 300 tack on an asterisk 
(I like asterisks) to the beginning 
and end of each string, ensuring 
they don't drop from sight. 

Another problem is caused by 
commas when used in the dis- 
play. Commas are string delimit- 
ers and will be read as such by 



la REM ••• TkS-80 "ETCH-A-SOREEN" 

HAY 19/9 HY J.K. SHRUM 
20 CLEAR 1250 »0EF I NIA-Z*0EFSTR S»0IMS( 15) »A=1536»iL=AlU*16383«C=1 

9UCLS 

30 IF INKcr$ = N D u rriENl 30 

40 RE* ••• DRAWING **• 

50 d«KEEK( 14&9!l):iF6*#ORB«24OR8*86THEN306LSEIFii*128fHENliJ0 

60 IFd = 8l>Rd=4 0ORd = 72ORd=136ORd=168ORd = 200Y = Y- 1 : IFY<0Y=0 

/0 IFd-16ORd=48ORd=80ORd=144OR9= 1/6OR4=20 8Y=Y*1xiFY>47Y=47 

80 IFd=32ORd = 4 0JRd = 48ORd=160OR-i=lt>8ORd=l/6X=X-1:lFX<0X = 

90 IFd = b4ORd=/2GKd = 80OR«=192ORd = 200Oh-j = 208X = X-t1: IFX>127X=12/ 

100 SEI(XtY) 

1 10 IFd>3SF'JRI = HOl0:NEXl:KESET(Xi Y) 

120 GOTO30 

U0 5slNK£Y$JlFS=""THE«ll3i 

140 I Fb = - T *• 1 Mt N 1 Jk» 

150 IFS="S"FHEN290 

160 IFS="L"ThEN330 

1/0 0010 130 

180 REM ••• IEX1 ••• 

190 D = PEE(t(A)zPQ*EAtC 

200 S=lNKEYi: I FS = "" POKE A i 32 :F OR I = 11010: NEXT: POKE A. 0:0010190 

210 3=ASC(S) 

22k) IFd=13POKEAiD:GOIO30 

2 H IFd>31ANDti<9lP0KEAt8:A=A*l: IFA>UTHENA=U 

24 lFd=6P0KEAtQ:A=A-1: IFA<LTHENA=l 

250 IF3=9P0KEA»D«A=A»1:|FA>U!rtENA=U 

260 IFd=10POrtEA»D:A=A*64: IFA>UTHENA=A -84 

2/0 IFri=9lP0KEAtD:A=A-64:IFA<LTHENA=A*b4 

280 GOTO190 

290 REM ••• SAVE ON TAPE ••• 

J0 FORI =K»r015:S( I) = "":nEXT»FORI=0TO15:FORJ = 0TO63:S(I) = S( l)*CHRi 

(PE£Ka+l*64+.J))iP0KEL+l*64+JH2iN€XTJ* I 

310FuRI=0Tu15:S(l)="«"»S(l)*"«":NEXT:CLS:PRINTCHR$(23):PklNT"lO 

A0 CASSETTE AND POSITION TAPE ■ : PRI NT : PRI NT"DEPRESS UECORO' AND 

VLAY'. KEYS"»PKlNT:PRlNl:PklNT:PRlNT: INPUT"PRESS 'ENTER' WHEN RE 

A0Y" ;Z:PRINT"kEC0RDI No" 

320 PR iNTf- It S(0)tS(1)»S( 2) »PRINT#-1.S( 3) »S(4)tS( 5) :PRlNT#-1»S(b 

)»S(O»S(8)tPRINT#-1tS(9)»S(10)*S(11)tPRINT#-1»S(12)tS(13)tS(14) 

IPRINT*- 1»S( 15)«GOTO370 

J30 REM ••• LOAD FROM TAPE ••• 

340 ClS:P«lNTCHRi(23):PRINT"L0AD CASSETTE AND POSITION TAPE":P*I 

NT :fKl\T M DEPRESS !_fLAY'_ KEY" : PR I NT : PRI NT :PR I NT : INPUT "PRESS 'ENTE 

R!_ BHEN READY" ;Z5PHI*T"L0ADING" 

350 FORI=0TO15:S( I )="":NEXT 

360 INPUT*- 1»S(I)»S< 1).S(2):lNPUT#-1»S(3)»S(4).S(5): INPUT*- It S(b 

)tS(/)tS(8J:lNPJT»-1.S(3)tS( 10)»S(11): INPUT#-1tS(12)»S(13)tS(14) 

: INPUT*- 1tS( 15) 

j/0 FORI=0TO1S:S(l)=MID$(S(l)t2»64):NEXT 

380 CLS:FORI=0TO14:PRINTS(I ) ; *NE XT I PRI NTLEF T«( S( 1S)t63);:P0KEUtA 

SC(RIGMTS(S( 15)t1))«GOTO30 

Program 7. The final product. The variable types have been defined and their values assigned at 
the beginning of the program. Variable labels have been reused within the program when possi- 
ble. All spaces in program lines have been deleted and multiple-statement lines are used. 



INPUT* statements when read- 
ing data tapes. The solution to 
this one is simple— don't use 
them when putting text on the 
screen. 

Since we want our program to 
be as user-interactive as possi- 
ble, we have to tell our user what 
to do and the proper time to do 
it. Lines 320 through 355 accom- 
plish this task by giving instruc- 
tions in double-width characters 
for cassette recorder set-up and 
delaying the program until the 
user indicates he is ready. 

Lines 370 and 420 finally com- 
plete the purpose of this mod- 
ule. Since each PRINT* state- 
ment can output 255 bytes and 



each of our strings is 66 charac- 
ters long (64 screen characters 
and 2 asterisks), we can com- 
fortably put three strings on 
tape with each PRINT* state- 
ment. That leaves us one string 
left over requiring its own 
PRINT* statement. On my ma- 
chine, lines 370 through 420 take 
about 40 to 45 seconds to com- 
plete their execution. 

Line 430 completes our save 
module by branching into the 
load module, redisplaying our 
screen pattern, and returning us 
to drawing. 

Load Module 

Program 6, the load module, 



will read our tapes back into the 
machine. 

Lines 520 through 560 tell the 
user how to prepare the cas- 
sette recorder and give him time 
to do it. 

Lines 580 through 600 then 
blank our string array just as it 
was done for the save module. 

After these preparations, lines 
610 through 660 read the previ- 
ously recorded strings from the 
tape, using exactly the format 
for the INPUT* statements as 
was used for the PRINT* state- 
ments. The formats must be 
identical to avoid blowing the 
data read. 

Now that the data is back in 
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FILL'S POLL 


■ 


1 Hi 


■1 ■ 


D QB 


D 


i D 


D ■ 


1 D 


■ 


1 II 


1 9 


■ u 




£ 


3 4 




BILL'S OXmi SO*£: 






1- l'S 


2 


9- a USE 




£- 2'S 


6 


ie- sa strt 


38 


3- 3'S 


3 


11- LG SIFT 


48 


4-4'S 




12- SAFETY 




s-ys 


S5 


13- YA-HOC! 


!* 


6-6'S 


24 






7- 3 KM 




BCMUS 




8- 4 KWD 




T8TAL 178 




SO YOU WISH TO ROLL AMY Sid A&tfrt? YES. 





Phofo 7. Etch-A-Screen was used to format this output display for a 
graphics game program. Much easier than trial and error. 



the S$ array, we have to get rid 
of our friends the asterisks. This 
is done in lines 670 through 690, 
using the MID$ function to pull 
our original strings from the 
middle. If you remember, line 
670 was also accessed from the 
save module, to strip the aster- 
isks from the strings for redis- 
play after saving. 

Now, all we have to do is dis- 
play the data. 

Since each element in the S$ 
array is 64 characters long, it 
generates a carriage return. 
Each PRINT statement, as well, 
triggers a carriage return unless 
overridden. Semi-colons will let 
us avoid double-spacing the 
first 15 lines, but a semi-colon 
won't override a carriage return 
when a character is printed in 
the very fast screen position in 
the bottom right corner. 

Accordingly, we clear the 
screen and print the first 15 dis- 
play lines with program lines 
705 through 730. Now we print 
all but the last character in line 
750. Once here, we get sneaky 
by taking the code number of 
our very last character and put- 
ting it directly into the proper 
screen memory address with 
line 770. This avoids a carriage 
return and leaves us with our 
display intact. 

At the end, we return to draw- 
ing with line 780. 



Operating the Complete Program 

The finished program is no 
harder to use than the individual 
modules. The program runs the 
drawing, module first. Typing D 
for done drawing lets you 
choose the module you want 
next. D followed by T puts you 
into text, while D followed by S 
or L lets you save or load, re- 
spectively. 

Both save and load return you 
to drawing automatically, while 
to return to drawing from text 
you must tape the ENTER key. 
One caution: You cannot go 
from text directly into save or 
load— you must hit ENTER, then 
D, then S or L 

Compacting the Program 

As I said at the beginning, we 
can make this program usable 
on a 4-K machine by condensing 
it with a few memory saving 
tricks. Reducing the memory 
any program uses pays a double 
bonus, even if your machine has 
a great amount of memory. 
First, memory-efficient pro- 
grams usually run faster and 
second, they store on less tape 
and CLOAD faster. 

The first and most obvious 
step is to delete remarks (REM). 
Be certain you have the docu- 
mentation maintained else- 
where. 




Don't be misled by more expensive Imitations! 

This is the original Photo point light pen pre- 
ferred and supported by some of the leading 
software sources like. 'Quality Software"— "In- 
stant Software "—"Level IV products and so on. 

Just imagine . . . 

In playing backgammon, (included) when you 
want to move a man, you just point at where you 
want to move from, then point at where you 
want to move to, and your man moves!!! No 
more fumbling with keyboards— YEA! 

Your Photo Point package comes complete; 

• 1 Photo point light pen (of course) 

• Info sheets on how to connect the pen and 
how to write your own programs 

ALL IN BASIC 

• Two apertures 

• AND two sensitivity settings 

• A cassette tape with 4 informative programs 
and games 

• Ready to connect to your TRS-80 System 
(DOS too!) 

• Does not void any Radio Shack warranties 

Requirements: 

• Level II basic 

• And a little imagination'! 

For fast real time programming it is your lowest 
cost peripheral at *19.9* 



Announcing 

NEW PEN BASIC by Steve Bjork 
Steve is one of the Best Assembly Lang pro- 
grammers around, and he has come up with PEN 
BASIC. This low memory routine will add 6 more com- 
mands to Level II such as PENGET which searches the 
entire screen for the pen and returns a number between 
0-1024 in about 1 sec. Plus 5 other commands. Perfect for 
you lightware authors and NEW light pen owners 
too! only *14. 95 




(COUPON) - 



Micro Matrix 

P.O. Box 938 • Pacifica. CA 94044 

Send for yours NOW: (41 5) 355-4635 



►^68 



Name 




Photopoint 






$19 95 


Address 










Pen Basic 


City 


St. 


$1495 


Zip 






Card# 




Money 


Ex 


CK. 


Order Visa MC 


Date 


D 


□ 









v Reader Service- see page 162 
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\ferbatim« 

10 for $29.00 

SCOTCH or MEMOREX: 10 for $31.00 

Verbatim FD 34 8000 Diskettes for the 
TRS 80 MOD II: 10 for $51.00 



mm I mini-disk £^ 

■"^^fc Protectors J k , 

3 Fit any 3- 



ST0RAGE 
CASES 



Fit any 3- 
ring binder. 
Hold 2 diskettes and ID 
cards. Vinyl. 10 for $5.75. 

Mini-Printer STOCK 

8-1/2" x 11"or9-1/2"x11", 

green bar or plain. One part. 
500 sheet box: $9.25 



Molded plastic. 

Hold 10 disk- 
ettes. 

Mini (5-1/4") Case: $3.75 
Maxi (8") Case: $4.25 



Checks and Bank Cards OK 
Free Catalog 




P.O. Box 327 
Center Valley. PA 18034 



DISK DRIVE WOES? PRINTER INTERACTION? 

MEMORY LOSS? ERRATIC OPERATION? 

DON'T BLAME THE SOFTWARE! 




ISO 1 




ISO 2 



Power Line Spikes, Surges & Hash could be the culprit! 
Floppies, printers, memory & processor often interact 1 
Our unique ISOLATORS eliminate equipment interaction 
AND curb damaging Power Line Spikes, Surges and Hash. 
•ISOLATOR (ISO 1 Al 3 filter isolated 3 prong sockets; 
integral Surge/Spike Suppression; 1875 W Maximum load, 

1 KW load any socket $56.95 

•ISOLATOR (ISO 2) 2 filter isolated 3 prong socket banks; 
(6 sockets total!; integral Spike/Surge Suppression; 

1875 W Max load, 1 KW either bank $56.95 

•SUPER ISOLATOR (ISa3). similar to ISO-1A 

except double filtering 8i Suppression .... $85.95 
•ISOLATOR (ISO 4), similar to ISO 1 A except 

unit has 6 individually filtered sockets .... $96.95 
•ISOLATOR (ISO-5). similar to ISO-2 except 

unit has 3 socket banks. 9 sockets total $79.95 

•CIRCUIT BREAKER, any model (add CB> Add $ 7.00 
•CKT BRKR/SWITCH/PILOT any model 

(-CBS) Add $14.00 

Mfe PHONE ORDERS 1617-655 1532 



^sa 



/S? Electronic Specialists, Inc. 

171 South Mam Street Natich Mass 01760 



Dept.8M 



I usually keep two separate 
versions of my programs, one 
expanded and the other com- 
pacted that I can run. When I got 
my printer, I also started keep- 
ing a hard copy of the expanded 
version. 

Another memory saving step 
is to remove all unnecessary 
spaces from program state- 
ments and use multiple state- 
ments per line when possible. 
This might make the condensed 
version harder for you to read, 
but your computer will be very 
grateful and will show its grati- 
tude by increasing the pro- 
gram's execution. 

More memory savings can be 
had by using the most precise 
variables and defining them at 
the beginning of the program. 
For instance, by defining vari- 
able S as a string, we save a byte 
every time we avoid typing S$ 
and use S. This can be a real 
saver, especially if you use inte- 
ger variables defined the same 
way. 

Finally, use variables for con- 
stant values, use the same vari- 
ables in different parts of the 
program and you'll save yet a 
few more precious bytes. 

Program 7 is our final product: 
our Etch-A-Screen program con- 
densed like crazy. You'll see I 
used the memory savers we just 
discussed. This final version 



leaves about 300 bytes (not a lot, 
but enough) unused when run- 
ning in a 4-K memory. 

The program has been renum- 
bered by 10s to accommodate 
those who like to use automatic 
line numbering for program en- 
try, and has been listed in 64 
characters per line format. This 
way. what shows on the screen 
should be identical with the 
printed listing. 

Conclusion 

I've included a couple of sam- 
ples to help you in Photos 1 and 
2. The first photo is the display 
format for a dice game I wrote 
based on Yahtzee. Believe me, it 
made the entire programming 
process go much more easily. 
Photo 2 is just a quick sketch I 

made of my house plan. 

Can this program be further 
improved? Most assuredly. How 
about a routine to display in- 
structions to the user? Or, 
change the program to use com- 
mand drawing. In other words, 
type in the appropriate com- 
mands to tell the computer you 
want a line drawn 25 units to the 
right and then sit back and 
watch the computer work. 

The list of modifications and 
improvements is endless. 
Should anyone come up with 
any they would like to share, I'd 
like to hear about them.B 



y : .l foTrCOT f&f BCVWE IMMIIC 

-- : - - tgn 



;e:>: 

KROOH 



mom f *■" "" 

HTCrO KWM 5 



LIVING 
POOH 



Photo 2. A quick sketch (it took about ten minutes) of our house. 
Notice in the examples that I did not use commas in the address 
heading. This avoids problems with INPUT* statements. 
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Can you find black's bast mova in the 
board position on the right? 

Our program can. (Black plays on the 
points marked 1 thru 7). 

Five Stones Software announces a 
Gomoku program for Level 1 1 TRS 
80 . The program has been written 
by the 75.77.79 North American 
champion and was the highest 
ranking microprogram in the 1980 
tournament. 

The program has the following 
features. 



GOMOKU 



H J K.UINQPQRS.T 19 




ABCDEFGHJKLMNOPQRST 



Name 



. book of openings with 200 entries 

. fast response to a four being played 

. ability to take back moves 

.16x16 board 

. blinking of last move by computer 

. carriage return not necessary for most moves 

. recent moves displayed along with board 



Address 
City _ 
State _ 



Zip 



□ Master Charge ^J visa 

Credit Card Number 



The program requires a mini- 
mum of 32K bytes of RAM, 
and is available for $29.95, Visa 
or Mastercharge accepted. 



For more information contact 

M 

Five Stones SoftwareQ ^239 

P.O. Box 1369, Station B, 
Ottawa K1P5R4, Canada 

TRS -80 is a trademark of 
Tandy Corp. 

Gomoku 29.95 

Ontario raiid«nU add 7% ta* 

Canadian residents add 9% tax 

TOTAL 

























INTERBANK NO. FOR 
MASTER CHARGE 










SIGNATURE 












Expiration Data 


MONTH 


YR. 




miscsfs 



Assembler into 
patch modifies 
under TRSDOS , 
Features? Add 
move, global 

pagination with 
sorted symbol 



or VTOS ! 
I/O, block 

printer 
prompting. 



>[1 iS^#Ili][l Turn your Editor 
a disk pacxage. Tnis 
EDTASM 1.1 i 1.2 
NEUDOS, 
full disk 
change , 
optional 
table, print memory 
utilization, correct DEFM expansion, 
protect memory, and recover after 
BOOT. From within the EDTASM you 
will have DIR, KILL, i FREE. This 
package is a must for assembler 
programmers! Priced at 520. 

DISK'MOD and DSMBLR II require a 32K 
disk system. 

>dSIlhlf II Complement your 

assembly language tools with this 
Z80 disassembler which produces 
screen, printer, or disk file 
output. A 2-pass process provides 
SYMBOLS for 16-bit address and 8-bit 
relative references. EQUates t ORG 
are generated. Priced at 520. A 16K 
Tape Version (DSMBLR 1.2) is 

available for $15. 



>! Illlll ! 



Now you can append 
2 or n.jre CMD files and/or SYSTEM 
tapes. Perform transfer to k from 
disk/tape of SYSTEM/CMD modules with 
offset capabilities. Provides PATCH, 
TAPEDISK, t LMOFFSET capabilities as 
well as adds a few of its own. Get 
CMDFILE today! 16K req'd. $20. 



• 221 



MISOSYS Department K 

5904 Edgehill Drive 

Alexandria, Va. 22303 

703-960-2998 

MASTER CHARGE & VISA Accepted 

A Sophisticated Model II Editor 
Assembler is now available. Contact 
MISOSYS or Galactic Software ltd. 



NIXON'S 

FAVORITE 




BLANK CASSETTES 
PREMIUM GRADE C-20'S 
5 SCREW HOUSINGS 

QQ£ea10/$8" 100/$ 75^ 

w ^^ORDERS UNDER $20 

ADO $2- IN OHIO AD05-1/2%TAX 



s 



DATA PRODUCTS 

P.O. BOX 17176 •"» 
CLEVELAND, OHIO 44117 



j FINALLY.. 




| PROFESSIONAL SOFTWARE... 


i Get results on the first 


run 


§ NO MANUALS! 




I TRS-80^ • • • 




W DEPRECIATION 


$19 


D MAILING LIST 


$79 


1 ADDING MACHINE 


$19 ( 


1 TEXT EDITOR 


$99 


| AMORTIZATION 


$19 


| COMPOUND INTEREST 


$19 


1 DEC/HEX/BI 


$19 


| PAYROLL (specify) 


$49 


| Weekly, 




1 Biweekly, 




I Monthly, or 




M Semimonthly 




INVOICE 


$29 


(check /m. order) 




5 PA residents. . .add 


6% 


e 9 
TRS-80 is a trademark of the 


Tandy Corp 


DIVERSIFIED COMPUTER SERVICES 


5601 PENN AVENUE 


A-23 


PITTSBURGH. PENNSYLVANIA 15206 


| 412-361-7540 


^247 



^Reader Service — see page 162 
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UTILITY 



Edit hybrid programs 
with ease, let the 80 do it! 



Progdata 



Steve Kelley 
9506 Peach St. 
Oakland, CA 94603 



Rule number one: Nothing 
should ever be entered 
more than once. Ever!! A good 
rule to display over your key- 
board somewhere, prominently. 

Once programs or data are 
entered, the process need never 
be repeated. Text changes are 
made with an editor. Relocation 
of an assembly language pro- 
gram is done by reassembling it 
at a different address. Adding a 
line to a BASIC program is 
simplest of all. Just enter the 
line. Room is made for the new 
line automatically at the right 
location. 

No retyping entire programs; 
no housekeeping to worry 
about; no hassle. 

Now the "GOTCHA." How do 
you edit the hybrid program — 
part machine language and part 
BASIC. How are they combined? 

Conver tin g to BASIC 

Since BASIC deals primarily 
with decimal numbers, it is 
customary to create and edit the 
machine language part of the 
program with an editor/assem- 
bler. The machine language pro- 
gram must then be converted to 
decimal numbers and put into 
BASIC DATA statements. A 



FOR-NEXT loop is also neces- 
sary to convert these DATA 
statements back to the machine 
language program. 

When the BASIC program 
RUNs, the FOR-NEXT loop 
READs the DATA statements 
and POKEs the numbers into 
the proper locations. This is 
done only once because the re- 
sulting machine language pro- 
gram stays in memory, even if 
the BASIC program that POKEd 
it there is cleared and another is 
run. A USR statement calls the 
machine language routine from 
a BASIC program. 

Until now, converting the ma- 
chine language program to 
BASIC statements meant 



changing a list of HEX numbers 
to their decimal equivalents, 
manually typing them into DATA 
statements and providing the 
FOR-NEXT loop. The program 
shown in Listing 1 eliminates 
most of this busy-work because 
it follows rule number one. 

After your program is assem- 
bled and the object code 
(machine language program) is 
loaded, the computer has all the 
information necessary to write 
its own BASIC program com- 
plete with FOR-NEXT loop and 
DATA statements. The BASIC 
program In Listing 1 does just 
that, and even stores the re- 
sulting program on disk. This 
computer-made program runs 



It * ••• PhOGDATA ••* 

20 CLEAR 2000 

3* ES-~TEKPDATA/BAS" 

40 H<S-~H0I234S67J»ABCDEF" 

5* CLS 

60 DS-~STARTUG ADDRESS ( ittl "IGOSUB 240IST-I1 

70 Df-TXDIIG ADDRESS (-IEO "I60SOB CA0IEM-IV 

9 OPW -3~» t.ES 

}0 AS-" 10 FOR »3-"*STRSCST>»" TO "• ST Rll EM > 

100 AS-AS*"|READ 59IPOKE '.i.'.IHEd »«" 

110 PRIMT All PRI1T#l.Atl At-— " 

100 L-JX-28 

130 FOfi »-ST TO EM 

140 IF AS-— TIEM A1-STR1CLMX)*" OATA"IL**-l-<t» 10 

1S0 BS-STRSCPEEK(5>> 

160 IF HIGHT1<A1»4>«»~DATA" THE* <t DM FS. 1. 1 >-". " 

170 AS-AS»8S 

130 IF LCMAt>>5S PRMI All PhU T# I. All Ai-"" 

190 <E<T » 

200 IF AS«>~" PRIJT All PRIMTfl. Alt AS" — 

210 CLOSE 

220 Phi IT'-PROGRJM IS It DISK FILE JAXED "»C-II«S< 34>» El'CHRlt 34) 

230 DID 

240 PRUT Dll I CS- ""I I t PUT CI 

2S0 IF LEMCCSXl MEJ 840 

26* 14-0 

270 FOR 5-1 TO LEM(CS> 

230 Z 1-1 JSTftC-t<l.-1I DSt CI.'.. ]>> 

270 IF »l"0 T-CE"4 240 

300 IF 51- 1 TfE'J 320 

310 I1-IM4 16*5 1-2 

320 JEXT 5 

330 IF U>65535 TiEt 240 

340 IF I «» 32767 T4EV IM"IM-65S36 

350 PRIMT"DECIMAL -"J U 

360 RETUHJ 



Listing 1. 



on its own or can be RENUM- 
bered and MERGEd with any 
BASIC program. 

Lines 60 and 70 input the 
starting and ending addresses 
respectively, which lines 90 and 
100 utilize when generating the 
FOR-NEXT loop statements. 
Lines 130-190 PEEK at the 
machine language program and 
add the resulting decimal 
numbers to the current DATA 
statement until it exceeds 55 
characters. Line 140 starts each 
DATA line with a line number 
and the word DATA. The com- 
pleted DATA line is PRINTed on 
the display and on the disk by 
line 180. This process repeats 
itself until the entire machine 
language program is converted 
to BASIC. Lines 240-360 make 
up the routine for converting the 
hex addresses to decimal. The 
routine doesn't accept illegal 
characters or numbers that are 
too large for addresses. Also, it 
ignores leading zero's and trail- 
ing H's and converts numbers 
greater than 32767 to the nega- 
tive numbers necessary for 
BASIC. 

One Suggestion 

If you don't have a disk, try 
changing line 180 to LPRINT the 
line instead of PRINTing it on 
disk, and take out the OPEN and 
CLOSE statements. You still 
have to type in the program but 
it's handier than a completely 
manual conversion. The pro- 
gram also converts graphic dis- 
plays or text to DATA state- 
ments although there are more 
efficient methods.! 
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EXPANDED MAILLIST SYSTEM 

By Harry Hopk.ni 

A"«-- 18 month., o' development and one year in fie'd testina CiC.S no« 
'• casek *ne most complete md'linq list system available 'or the TRS-80 a* • 
••pec "» : o« .ntroduetory price of $59.95. The system requires a smqle d'sl i 
3?l interlace and a printer. 

The Expanded Mailllst System uHiies an eic'usive machine lonquaqe sort 
»h>ch allow, for the so't of 500 records by name state o' 'ip code in 5 seconds! 
The system has complete error trappinq and recovery such as automatically savmq 
»h* Me when memory space is full &"d remaininq in the system under a f'le no* 
•ound' condition. The system a'so has multiple file and reorganization capabilities 

The foUo—nq f u "» linked p'oqrams are included in the Expanded Mailhst 
Sy'em 

1. DUPLICATE CHECKING — Checks -or dupl-cafes as you dtt. and a^so has 
a separate OktWaa rh 8 « w . purqe an ent.re file of duplicate names —ith a smqle 
command. 

2. FILE MAINTENANCE— Used fat add.nq delet.nq and compete edtmq 
of your mac' s' L'ev 

J. LABEL AND LIST PRINTING— Al o-s selective pr,nt,„q » labels o' hsts 
in jp »c a ten diqit key. Also has fu' 1 Suppression capability. For example if 
you want a 'ist of everyone »n your file with a JAN' in their key code except 
those- w.th an 80' you should select JAN' and suppress '80'. 

4. STATUS ANALYSIS — Th, 5 proqram will qenerate statistical reports on the 
percentages of names with certa.n keys or reqional breakdown. Very useful for 
'as' Hue no*ices on 'abels. 

5. FILE REORGANIZATION— W.th this proqram you may reorqan.te your 
f-'vs nto specific alpha or i p code ranqes for true m u lti file capability. 

6. MULTI-PURPOSE LABEL UTILITY— Provides formatted printing f labels 
• or -,p«C'* : app ications. 

Eipended Maillist System on diskette with manual $59 95 
Manual only 13 with full credit towards purchai*. 



AMCT-80 



By Earl Peterson 

Th,. aur&matic morse code teacher for the 16k level 2 TRS 80 % the only 
morse code proqram that «riS automatical (at your option) slow down or speed 
up depending on your profic ency to receive code. It includes 9 preproqrammed 
progressive oercises F u i'y varieb'e speed up to 30 w.p.m. 19 characters per 
group and I 9 spaces between qroups a'e user selected options. The send 
«liow> for keyboard entry concurrent to sendmq by utiliiinq a 256 byt« 
b u "er Thee are V user programmable messaqes of M characters each. 

Th.s mach.r.e anquaqe proqram is truly the morse code teache' of tom( 
•oday 1 



node 



& 



AMCT-80 on cassette with full documentation $14.95 
Dealer inquiri.s invited. 



^ 



COST EFFECTIVE COMPUTER SERVICES 
1041 Ute— P. O. Box 3543 Grand Junction. CO 81502 

(303) 243-3629 .„ 



sdj> 
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SUPERIOR SOFTWARE PACKAGES 
DISK BASED IjKS-oO* 

SMARTTERM •$79.95 

UNQUESTIONABLY THE BEST 

SMART TERMINAL PACKAGE 

FORTHETRS-80 

•True Break Key 

•Auto Repeat (Typomatic) keys 

• Programmable 'soft' keys 

• Forward/Reverse Scrolling 

Multipage Display 
•Transmit from Disk File, Screen 
or Buffer 

• Receive to Disk File. Buffer or printer 
•Multi Protocol Capability 

SPOOL-80 • $39.95 

A TRUE DISK-TO-PRINT DESPOOLER 
FORTHETRS-80 

• Print Disk Files While Running 

Other Programs 

• Prints Compressed Basic Files 

• Includes RS-232 Driver for 

Serial Printers 

CALL US FOR YOUR CUSTOM 
SOFTWARE REQUIREMENTS 

MICRON, INC. ^73 Model ii 

10045 Waterford Drive Versions 

Ellicott City, MD 21043 Available 

(301)461-2721 Soon 

• TRS-80 is a Trademark of Tandy Corp. 



WHO NEEDS IT? 

l-cl's fact it — diagnostic software is prnhahls not at the 
top ol your shopping list. After all. your system prohahlv 
works OK must of the time. But if you want to find the 
cause of that occasional dropped bit or messed up disk file. 
or if sou just vs ant to know for sure that sour system is 
ROCK SOLID, you need good diagnostic software. 



FLOPPY DISK DIAGNOSTIC- Tests even sector on 
even track on 1 to 4 drives. 35 or 40 track: checks drive 
motor speed; checks switches and index pulse sensor: 3 
stepping rates; tests drive-to-drive compatibility; more! 
F.rror messages and an error summary are printed out lor 
each drive, the January 1080 OCTUC .Sen sieffrr called 
this program "a significant step toward making Disk 
users self sufficient in diagnosing and correcting disk er- 



MEMORY DIAGNOSTIC — In addition to the usual 
write' read tests, this diagnostic checks refresh and 
seniles that each memory address is unique The "M-l 
Worm " test executes a block erf machine code from each 
address. If your memory passes this diagnostic it is 
SOLID! 

Both machine-language diagnostics are supplied 
together on diskette for the Model I TRS-00* with instruc- 
tions for use and hints to troubleshooting 

PRICE: $24.95 

CA residents include fi ' % %aln tax. Add U.UO P H 
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THE MICRO CLINIC 

17375 Brookhurst #114 
Fountain Valley. CA 92708 

'TRS-80 is a registered trademark of Tandy Corp 



Radio Shack Dealer 

Computer Systems Center 

TRS-80* 

SPECIAL 

4K Level I was $499.00 
NOW $440.00 

16K Level II was $849.00 
NOW $739.00 

Available for immediate delivery. 

Warranty honored at any Radio Shack. 

Add $7.00 shipping and handling in 

continental U.S.A. 

Tennessee residents add 6% sales 

tax. 

Send check or money order to: 

Radio Shack Dealer 

103 Pico Court 

Hendersonville, TN 37075 

Phone 615-824-5762 
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APPLICATION 



Use your 80 to work out model measurements. 



Model Conversion 



Tom W. Blackburn, III 
15593 Paseo Jenghiz 
San Diego, CA 92129 



Colossus came into our 
home solely to provide 
diversion and intellectual stimu- 
lation. This he accomplished 
beyond our greatest expecta- 
tions. Though utility was not a 
requirement, any time he could 
be of assistance was certainly 
appreciated. Colossus is a most 
welcome Radio Shack TRS-80, 
Level II, 16K microcomputer. 

To date Colossus has taken 
over such household tasks as 
maintaining our address book, 
serving as a calendar of events 



and most importantly, keeping 
me off the streets at night. His 
latest accomplishment grew out 
of Christy's most recent project. 
Not long ago, Colossus dis- 
covered Christy sitting at the 
desk surrounded by little pieces 
of wood, paints and a vast as- 
sortment of small tools. She 
was going to build and furnish a 
new house, an adult doll house 
— a showcase built with great 
precision and detail, adhering to 
the traditional scale of one inch 
to the foot. 

Conversions 

Furniture and fixtures soon 
began to appear. However, a fly 
landed in Christy's ointment. 
She has always ranked math 



'■DOWN-:S»12 



••• FEET 



20 CLS:F=.01562S:M$(1) = "'JP":M$(2) 
30 PRINT'MINIATURES CONVERSION* 
40 MS="SCALED % % DIMENSION: 

INCHES" 
50 PRINT: INPUT'SCALE UP OR DOWN";BS 
60 FS-":I$«" 
70 PRINTCHR$(27) ;CHRS(27) :INPUT'ENTER MEASUREMENT (FEET 

, INCHES) :*;FS, IS 
80 Fl-VAL(FS) :LI-LEN(IS) :N-0 :D«1 : I1«0 
90 FORX-1TOLI : IFMIDS ( I $ , X , 1 )< >CHR$ (47 ) THENNEXT: 1 1-VAL ( I 

$) :GOTO160 
100 FORY-XT01STEP-l:IFMID$(I$,Y r l)<>" "NEXT:GOTO130 
110 I1-VAL(LEFT$(I$,Y-1)) 

120 IFI1>-12THENF1-F1+INT(I1/12):I1-I1-(INT(I1/12)*12) 
130 N«VAL(MIDS(I$,Y+1,X-Y-1)) :D-VAL (RIGHTS ( IS, LI-X) ) 
140 X-LI:IFY<1NEXT:GOTO17 

Y-1:NEXTY,X 

IFI1>-12THENF1-F1+INT( 11/12) : 11-11- (INT (11/12) *12) 

IFLEFT$(BS,1)-"U"THEN270 

Z-2:X-0:Y«64:I2-(I1+N/D)/S:F2«INT(F1/S) : 11-12+ (Fl/S 
-F2)*12:I2-I1-INT(I1) : IFI1-0THENI1S-" "ELSEI1S-S 
TRS(INT(I1)) 
190 Fl-F2:I2-I2-INT(I2) : I FI2-0THEN260 

X-INT(I2/F+.5) :IFX-0THEN260 

IFX/2-INT(X/2)THENX-X/2:Y-Y/2:GOTO210 
220 X$-STR$(X) 

230 YS-STRS(Y) :YS-RIGHTSiYS,LEN(YS)-l) 
240 IFX«1ANDY»1THENI1-I1 + 1:U$«STRS(I1) :GOTO260 
250 PRINTUSINGMS;MS(Z) ,F1, Il$+XS+"/"+YS:GOTO50 
260 PRINTUSINGM$;M$(Z) , FJ , 1 1 S : GOTO50 
270 Z«1:F1-P1*S+INT(I1*S/12) : Il-Il*S- (INT ( I1*S/12) *12) 

280 i1«i1+int(n*s/d) :i2-!n*s/d)-int(n*s/d) : ifi1-0theni1 
$-" "elseiis-strs:id 

290 IFI2-0THEN260 

300 X«INTU2*64+.5): , f''64:GOT021fl 

Program listing. 



150 
160 
170 
180 



201 
210 



right up there with trips to the 
dentist and ingrown toenails. 
Now, suddenly, she was en- 
countering an endless series of 
conversions, feet and inches 
reduced to the 1/1 2th scale. 

Colossus began to study her 
project and did not rest until he 
could make the desired conver- 
sions in the blink of his cycloptic 
eye. The following is a descrip- 
tion of Colossus' new-found 
knowledge. 

A quick inventory of the 
measuring instruments in the 
house revealed that like most of 
the rest of this country — we had 
not made the switch to the 
metric system. This meant Col- 
ossus had to train himself to 
handle fractions. He made the 
arbitrary decision that 1/64 of an 
inch was the highest degree of 
accuracy with which he cared to 
contend. Scaling measure- 
ments down to 1/12th of the 
original might not be sufficient, 
he guessed. He would have to 
scale upward as well — as a 
check of the miniature's 
faithfulness. 

The Program 

Lines 20-60 set up the pro- 
gram. The variable M$ in line 40 
is used as the output format for 
displaying the scaled measure- 
ments utilizing the PRINT US- 
ING statement. The two vari- 
ables M$(1) and MS(2) indicate 
whether Colossus has scaled 
the given measurement up or 
down and supply these two 
words as appropriate at display 
time. The variable F in line 20 is 
set equal to the decimal render- 
ing of 1/64. This variable is used 
later for the conversion from 



decimal to fraction. 

Colossus asks in line 50 for 
your guidance as to whether he 
should scale upward or down- 
ward. This question and your 
response is wiped out by the two 
PRINT CHR$ (27)'s which begin 
line 70. The rest of the line re- 
quests the measurement which 
is to be scaled — feet and inches 
separated by a comma. 

Fractions of an inch are 
entered in standard notation; 
e.g. 5/8. Separate the whole 
inches from the fraction, if any, 
with a space. 

A measurement can be en- 
tered in inches only (preceded 
by a comma) without converting 
it to feet and inches; e.g. 58 inch- 
es instead of 4 feet 10 inches. 

Lines 80-130 break down the 
measurement. As applicable, 
Colossus assigns values to 
these variables: 

F1 = number of feel 

11 = number of whole inches 

N = numerator ot inches fraction 

D = denomonator of inches fraction 

This disassembly process in- 
volves two loops each search- 
ing, character by character, the 
string that contains the inches 
portion of the given measure- 
ment; i.e. 1$. The first loop, line 
90, looks for a slash (I). This 
signifies that a fraction was in- 
cluded in the inches measure- 
ment. 

If no slash is found, Colossus 
assumes whole inches only and 
bypasses the rest of this sec- 
tion. The second loop, line 100 
starts at the position of the 
slash found in line 90 and 
searches backward for a space. 
If no space is found, he as- 



128 • 80 Microcomputing, May 1980 



Scanned by Ira Goldklang - www.trs-80.com 



sumes that only a fraction was 
given for the inches portion of 
the measurement. 

Lines 140 and 150 reset the 
search loops appropriately. This 
is necessary since finding the 
search key causes Colossus to 
exit the loop. Without these two 
lines, the search loops would 
have been left active. In a 
repeating program such as this, 
memory will slowly be eaten up 
by these abandoned active 
loops. 

Lines^120 and 160 check the 
inches in excess of 12 or one 
foot and convert them to feet 
and inches appropriately, add- 
ing any additional feet gen- 
erated to the number of feet In- 
put. 



Colossus is many things, but 
psychic he is not. Therefore, in 
line 170 he checks your earlier 
instructions as to whether he is 
to scale upward or downward. 
Up to this point the routines are 
compatible for either conver- 
sion. 

Scaling upward causes a 
branch to line 270. 

Scaling downward is per- 
formed in lines 180-240. The ac- 
tual scaling takes place in the 
first two lines (180 and 190) and 
the rest are used to convert any 
decimal fraction to a conven- 
tional fraction. This is accom- 
plished by dividing the decimal 
fraction by F (.015625). The 
rounded integer yields the 



number of 64ths in the decimal. 

Colossus then repeatedly 
divides by 2 to reduce the frac- 
tion as far as possible (e.g. 32/64 
= 16/32 = 8/16 = 4/8 = 1/2). 
This reduction is performed in 
lines 210-240 and is used in 
both upward and downward 
scaling. 

Lines 270-300, which con- 
trol an upward scale, multiply 
the measurement by 12 and 
create a new fraction with a 
denominator of 64, if required. 
He then goes back to lines 
210-240 to reduce the fraction. 

Conclusion 

At this point Colossus need 
only tell us the answer. If no 
fraction is involved this is done 



with line 260. If a fraction is dis- 
played, line 250 if used. The out- 
put variables are: 

F1 = feet 

MS = inches 

X$ = numerator of inches fraction 

YS = denomonator of inches fraction 

Colossus opted for string 
variables to display the inches 
so that he could concatenate 
them, thereby suppressing the 
leading and trailing spaces 
found in integer variables. 

Also by changing the value of 
variable S in line 20, the scaling 
factor is changed. If S were 
changed to 6 for example, the 
scaled measurements would be 
converted with the ratio of 2 
inches to the foot (12/2 = 6).B 



COMPUTER FORMS 



^240 



1-616-42979Z2 



MICROCOMPUTER 
PAPER PRODUCTS 



ALL ITEMS BELOW: BLANK, WHITE, FANFOl D, 
TBACTOB (PINFEED) PAPEB STOCK 
POSTCARD, Q*l . CAKD STOCKi 4">»" (7" carrier 
Wt«th| I 4" F.XTBA MARGIN FOR H 1"»» I »" CARDS 
IMMII P.O. Site y ThlchMM re«alrea»eate| 

If* car* a . . SS.etfe* carta . . aa.atjiaaacarSa . . SI7.*f 

ADDRESS LABELS: I* i»" . HI", a levels ecreee, 

Preeaure Senaltl » • 

•1 • lakela . . »i es see laBSBl . . »s e« iaaa littli . . •• e< 

PAPER: •ii'iii" |S- 1 mi w ii" perlereteS 

margla.) 

tee •Meets SS.SS iihiKkh iii« 

lie* sheets . sis es 
PAPER: 14-7 •"■II"' Iaaa pari eaerflasl 
f*a sheets sees HM,h.,i, ntn 

»iaa sheet • . . sie ♦« 



Cash Orderi Include «z for shipping 

charges, and the excess will he hilled with 

your order. Credit Card 

Order: Shipping charges 

will he added to your 

order. Send all credit 

card Information. 



COMPUTER FORM!. IfM CARIBOU. 
■ TIVENSVILLE. Ml 4*117 



CHECK 

am 

MONEY ORDER 



"*) »hon# call au'oy from VPS dolfvory" 



EDUCATIONAL 

SOFTWARE 

TRS-80* 

80 + Programs In: 



ELEMENTARY 

SCIENCE 

GEOGRAPHY 

ECONOMICS 

FOREIGN LANG. 

GAMES 



MATH 
BIOLOGY 
HISTORY 
ACCOUNTING 
BUSINESS ED. 
MAIUNG LABELS 



Programs Are grouped Into packages of 
4 to 7 programs priced at $14.95 per 
package Including shipping and han- 
dling. Available on disk or tape. 

Write for catalog: .--89 

MICRO LEARNINGWARE, BOX 2 I 34, 
I. MANKATO MN 56001. 507 -625-220! 
f'TRS 80 Is a registered trademark of TANDY CORP 



MAXELL® 

OR SCOTCH" BRAND DISKS 

Some computerists pay less but may not get 
Shuggart' or IBM* approved disks 

8" SINGLE SIDE • DOUBLE DENSITY 
Box of 10 FOR $50 00 

8" DOUBLE SIDE • DOUBLE DENSITY 

Box of 10 FOR $65.00 

SV*" MINI — Box of 10 FOR $40.00 



■<gil DYSAN DISKS 

* ****** 
5 "4 ' Mini • Box of 5 (or $25.00 




COD $1.00 Additional — Specify <8" 
Soft or Hsrd Sector) (5 "Soft or Hard Sector) 





CUSTOM r-w 
ELECTRONICS INC. ° 

238 EXCHANGE STREET 
CHICOPEE, MASS. 01013 
est i960 1—413—592-4761 

HOURS: Tues. to Sat. — 9 to 5 

ATARI* • •TI/BB-4.MATILL- 



TRS-ALT SOFTWARE 



GUITAR CORDS II • 

Has 1 1 8 chords that are displayed with graphic, to teach the 
guiur Chords can be added, dantad. changed, planed in any 
order, and be made to last for any length of time. Software 
directory said. (Hare s a brilliant ideal and (one of the mot! 
practical ideas I '•aveseen lor personal computers) $19 95 

BARTENDER • 

84 recipes at your disposal. Pick a drink by name, or from 
a rotating list by just Ihe touch of a kay. Snows proper 
glass to use, with appealing graphics. Tan them all and find 
your favorite, includes Pina Colada. $14.95 

SIGNING • 

Learn to talk with the deaf and dumb. Type in any phrase 
up to 2,000 characters long. It then reads back one letter 
at a time, showing the hand positions for each litter You 
have control ow the speed, and whether or not the phrase 
•hows on the screen, if sn the letter being signed s high- 
lighted. S19.95 

FORMS • 

We also carry forms to aid in all your programming efforts, 
from documentation to POKEmg and PEEKing You will 
be most impressed with our CRT map that Is equal in size 
to your 12" CRT. on clear plastic. Write for catalog include 
SA.S.E 



EN-JQV COMPUTER PROGRAMS 



P-Q. BQX J535 



GQLETfl. Cfl ^3017 




r.<ao* S-c Joco""*"' 09 ,_, M J*££ 
«•" to"- . **'% 



0i9gSSCSL^fOSk 




s-f^SaVasr! 



V» 



*5 



a" 13 



^•jaf** 




■* ..ifrK*- ■»» = _. 



CqmpuCquer 




COVER YOUR INVESTMENT 



cio'" Backed Na.,aa > *rd« 
imorovee b. a) 

longer life 






2=:s 



imawrMwi'M'H 

ikIuM Si M ter pellets Ml luneneg 

O.mmi srsVi iedues U to sesuss 

DEAlEmNOUIUtlKVIIED 



CasniLW " 10 ° 

r u Bob m lOagt C) 
Mary Eons' 'I 325*3 

Pliont («4| MJ-W9J . 



* Reader Service — see page 162 
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UTILITY 



Produce program sounds through your cassette recorder. 



Super Sound 



David G. Morr 
6599 Red Fox Rd. 
Reynoldsburg OH 43068 



Adding the ability to create 
sound effects or even a 
limited music ability to the Ra- 
dio Shack TRS-80 Level II com- 
puter is easy and free! It is easy 
because there are no hardware 
modifications required, and 
your BASIC programs require 
only three additional lines of 
code to enable the sound out- 
put. It is free because the soft- 
ware is given in this article, and 
the audio output can come 
from your cassette player. 

The sounds that your TRS-80 
can make with this program are 
limited only by your imagina- 
tion . . . from the beep and boop 
of ping-pong video games to 
the motor putt-putt of car mo- 
tors or space-game phasor 
sounds. Single-voiced music 
sounds are also possible. 

What It Does 

The machine-language rou- 
tine shown in Fig. 1 is used to 



operate the audio output inter- 
face normally used to write pro- 
grams and data to the cassette 
recorder. The software provides 
a means to control how often 
the dc voltage available at the 
output is toggled from .85 volts 
to .05 volts and back again. In 
addition, the software is used 
to determine the length of the 
transitions. This means the fre- 
quency and duration of tones 
are readily defined by your BA- 
SIC program. 

Using an oscilloscope, I mea- 
sured the frequency and dura- 
tion of the Super Sound output. 
Figs. 2a and 2b are tabulations 
of what was measured. The 
shortest and longest durations 
are 7 milliseconds and 1.753 
seconds, respectively. The high- 
est and lowest frequencies are 
14.3 kHz and 75 Hz, respec- 
tively. Producing these different 
sounds from your Level II BA- 
SIC programs is quite easy, as 
we shall see. 

Software Description 

Fig. 3 is the flowchart for Su- 
per Sound. The routine is called 



0000 


CD 7F 0A 


ENTER 


CALL 


0A7FH 


0003 


3E 01 




LD 


A,1 


0005 


0E 00 




LD 


CO 


0007 


ED 5B 3D 40 




LD 


DE.(403DH) 


000B 


45 


LOADSB 


LD 


B,L 


oooc 


2F 




CPL 




0000 


E6 03 


LOOP 


AND 


3 


000F 


B3 




OR 


E 


0010 


D3 FF 




OUT 


(OFFH).A 


0012 


0D 




DEC 


c 


0013 


28 04 




JR 


Z.DNSTST 


0015 


10 F6 




DJNZ 


LOOP 


0017 


18 F2 




JR 


LOADSB 


0019 


25 


DNSTST 


DEC 


H 


001A 


20 F1 




JR 


NZ.LOOP 


001C 


C9 




RET 





Fig. 1. Assembly-language listing of Super Sound subroutine. 
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from BASIC by the USR(X) com- 
mand. The value X is passed to 
the routine when the USR(X) 
statement is executed and is 
converted to a 16-bit signed bi- 
nary integer by the CALL 0A7FH 
instruction. This leaves the H 
and L registers of the Z-80 CPU 
with the binary value. The value 
in the H register is used by the 
routine to fix the length or dura- 
tion of the sound output, and 
the value in the L register is 
used to determine how often 
the output will be toggled dur- 
ing the output. 

The fundamental timing of 
the routine is determined by the 
C register. This register is con- 
tinually decremented, while it 
uses the B register to deter- 
mine when to toggle the audio, 
until it reaches 0, then the H 
register is decremented and 
tested for 0. If the H register is 
not 0, then the C register will be 
decremented as before until it 
reaches again. The routine is 
finally exited when the H regis- 
ter equals 0. Since the H regis- 
ter is decremented before be- 
ing tested, the smallest H value 
that will result in the shortest 
tone duration is 1. 

The value in the L register is 
unchanged by the routine. Its 
content value is, however, con- 
tinually loaded into the B regis- 
ter and used as a down counter 
during the C register decrement- 
ing mentioned above. Every time 
the B register reaches the 
audio output is toggled and the 
B register is reloaded from the L 
register. The smaller the number 
in the L register, the higher the 
sound frequency will be (L = 1 



results in the highest frequen- 
cy). 

The shortest-duration/high- 
est-frequency sound occurs 
with the H register = 01 and the 
L register = 01 or the combined 
HL register = 0101 hexadecimal. 
To convert 0101H to a decimal 
value, multiply the H value by 
256 and add the L value. This re- 
sults in 257 decimal. The long- 
est-duration/lowest-frequency 
sound occurs with the com- 
bined HL register = 0FFFFH (ac- 
tually, is a bit longer and lower). 

The Super Sound routine is 
written in all relative code. With 
the Z-80 CPU, relative code 
translates to a special set of 
jump instructions that do not 
specify the address value of 
where they are to go. Instead, 
they use a single byte displace- 
ment value (either + or-) from 
the current memory location. 
The advantage of relative code 
is that it can be located any- 
where in memory without 
changing any of the program 
statements or values. The abil- 
ity to use relative addressing is 
one of the important advan- 
tages of the Z-80, and its use 
with this routine reduces the 
size of the subroutine and 
makes it easy to use. 

Implementation 

In order to produce the sound 
from your computer, you must 
connect an audio amplifier and 
speaker to the cassette output 
plug of your TRS-80. Since the 
voltage out is less than 1 volt 
peak to peak, you can use at- 
most any sound amplifier (do 
not use any amplifier that is not 




TRS-80 is a registered trademark of TANDY CORP. 

SYSTEM 
EXPANSION 

FOR THE 

TRS-80' 



k TM 
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PC BOARD A 1 
SER MANUAL J 










» SERIAL RS232C- 20mA I O 

» FLOPPY CONTROLLER 

• 32K BYTES MEMORY 
» PARALLEL PRINTER PORT 
» DUAL CASSETTE PORT 

• REAL-TIME CLOCK 

» SCREEN PRINTER BUS 

» ONBOARD POWER SUPPLY 

» SOFTWARE COMPATIBLE 

• SOLDER MASK, SILK SCREEN 

LNW 

RESEARCH .„ 



8 HollowgUn St. Irvine CA 
714-552-8946 92714 

TO ORDER 

O. Box 16216 Irvine CA 92713 
Add S3 for postoo* and handling. 
CA rei iden Is add 6% sole j tax 




COMPUTER 
PIRATES 

-OflTfl 
THIEVE 

ARE HERE... 

Don't let computer pirates: DIVINE your DATA 

FILCHE your FILE'S 
PERUSE your PROGRAMS 
Protect them all with CRYPTEXT, the hardware 
encryption module that brings ultra-high level 
security to the small computer user. Once 
encrypted, your files can be stored or trans- 
mitted in strictest privacy. A single CRYPTEXT 
unit will differentially control the medical, 
legal or financial records, mailing lists, and 
design data for an entire firm. 
Breaking CRYPTEXT encrypted data is like un- 
scrambling an egg. We don't say its impossible 
but we have 3 oz. of fine gold waiting for the 
first person who succeeds in breaking our test 
message . 
SECURITY SYSTEMS FOR USE WITH: 



TRS-80 APPLE II 



SUPERBRAIN NORTHSTAR 
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WORD PROCESSING 



If you're shopping for a letter quality 
printer in the $1000 to $2000 range, take a 
hard look at the IBMS0 Electronic Typewriter. 
Then you should write or call us about our 
unique hardware and software that lets you 
use your Radio Shack TRS80 with the IBM 50 or 
60. With our powerful package and the IBM- 
SO's many features: word processing, superior 
printouts and even typesetting (like this ad) 
are possible. 



keyboard input 



...in BASIC is pretty crude. That's why we 
developed INMOD 3®a relocatable machine lan- 
guage program that gives you an upper /lower 
case driver with shift lock, blinking cursor, 
repeat keys, control keys, and user defined 
INPUT length. Anybody can easily incorpor- 
ate INMOD 3 into their L2 or DISK BASIC pro- 
gram for fully professional keyboard input. 
TNs program is a must for any BASIC pro- 
grammer! $15.95 



HllliUIX 
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PO Box 8775» 

Universal City, CA. 91608 

213-&7S-9949 



VISA or MASTERCHARGE welcome: 



12:40 4 QUARTER 

VISITOR HOME 

17 SCORE 14 

3 TIME OUTS 3 



I 



•*— HOME 2 DOWN 7 YARDS TO GO 



I I I I I I I I I 
IIPIIHII 

102030405040302010 



1 



HOME 


OFFENSE 


1 OFF TACKLE 


7 LONG PASS 


2 END RUN 


8 FIELD GOAL 


3 Q SNEAK 


9 PUNT 


4 DRAW 


10 TIMEOUT 


5 SCREEN 


11 RESTORE 


6 SHORT PASS 

? 





FOOTBALL 

fe TRS-80* 

Now you can play lootball at home on your Level I AK 
TRS-80'. You and your opponent plan strategies against 
each other. The computer analyzes the offensive and 
defensive plays and calculates yardage lost or gained 
Send $79.95 for your lootball cassette and instructions. 

FERIN ENTERPRISES ^ 
6310 Underwood Ave. S.W. 
Cedar Rapids, Iowa 52404 

'TRS-80 is a trademark of the Tandy Corp. 



TRS-80* DISK FILE MESS? 

Find disk files instantly with the most sophisticated disk indexing program available. 
Similar Indexing programs exist but none with as many features as FINDISK-ll! 

AUTOMATICALLY create, sort, print, search a Master Index of aH disk files. 
AUTOMATICALLY read file names, disk numbers (no hand entry). 
AUTOMATICALLY print disk labels (optional). 
AUTOMATICALLY update Index from revised disks. 
AUTOMATICALLY add optional file descriptions. 
AUTOMATICALLY purge disks of unwanted files. 

• FINDISK-II (on tape or disk, 32K min) $20.00 

Other powerful programs from Documan available on tape or disk: 

• STRUCT-I beam design and moment transfer w/graphics (16K) $15.00 

• SOLAR-I essential calculations for passive solar design (32K) $30.00 

• RIA-I complex analysis of real estate investments (32K) $30.00 

• DEPRECIATE! calculate, print 12 facts on depreciable items (16K) $10.00 

^u VISA OR MASTER CHARGE 

DOCUMAN SOFTWARE BOX 387-A KALAMAZOO, MI49005 (616)344-0805 



^Reader Service — see page 162 
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Frequency Value 


Tona Frequency Frequency Valua 


Tona Fraquancy 
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Fig. 2a. 


Frequency values. 




Duration Valua 
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To generate a tone, pick a fre- 
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quency value, FV, from Fig. 2a 
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and a duration value, DU, from 





1.753 


Fig. 2b. Generate the tone by 






executing the 


BASIC state- 


Fig, 2b. Duration values. 


ment, SS = USR (256 *DU + FV). 



transformer isolated from the 
120 volt ac line). 

One possible amplifier is your 
cassette recorder. To use your 
cassette unit: (1) disconnect 
the motor control cable from 
the recorder; (2) remove any 
cassette from the machine; (3) 
open the cassette door and 
press the small lever at the 
back left of the cassette well to- 
wards the back of the well; (4) 
press the RECORD and PLAY 
buttons simultaneously; and (5) 
plug a speaker into the ear- 
phone jack. Any audio output 
from your computer can now be 
heard from the speaker. 

Using your cassette unit and 
a speaker is a reasonable 
means for audio output from 
your computer. An even better 
way is to use a gadget that your 
local Radio Shack sells: the 
speaker/amplifier, part number 
277-1008. This small unit has an 
input jack that is plug compat- 
ible to the cassette cable from 
the TRS-80. So to use it, all you 
need do is unplug the cable 
from the MIC input of your cas- 
sette unit and plug it into the 
speaker/amplifier, turn it on, 
and you're in business. 

The BASIC program is one ex- 
ample of how to use the Super 
Sound routine. Before the pro- 



gram is loaded, the MEMORY 
SIZE? prompt must be set equal 



to one less than the decimal 
address of the first byte of the 
routine. In the program the value 
is set to 32737, allowing the 
routine to be placed at the top 
of a 16K RAM TRS-80. If you 
have 4K memory, then answer 
the prompt with 20447 and 
change line 110 or line 1010 to 
read AD = 20448. 

Each time line 230 or line 
1040 is executed in the pro- 
gram, a random duration value 
is added to a random frequency 
value. The sum is then passed 
to the USR( ) routine, and the 
tone is generated. Subsequent 
loops of the programs will gen- 
erate differing tones of differ- 
ing lengths. 

Example Game Program 

The Race program shows an 
example game program using 
the Super Sound routine. The 
program is a heavily modified 
adaptation of the original, 
which was conceived by Bill 
Louden, a local Radio Shack 
store manager. In the game, a 
car appears to be traveling 



down an ever-curving road that 
wanders back and forth across 
the screen. The road becomes 
narrower as the game pro- 
gresses. The car continually 
makes a putt-putt sound, and 
the player must steer the car to 
avoid running off the road or 
falling into potholes. Appropri- 
ate sound effects are added if 
misadventure strikes. The pro- 
gram takes less than 2.5K of 
memory. 

Whenever the statement SS 
= USR(xx) appears in the pro- 
gram, a tone will be generated. 
The length and duration of the 
tone are set by the value xx as 
described earlier in this article. 
All the xx values in the program 
were derived from experiment- 
ing and playing with the game. 
The first few lines of the pro- 
gram are used to load the USR( ) 
subroutine as in the BASIC pro- 
gram. Spend some time study- 
ing Race to get some ideas for 
your own programs. 

A Challenge 

I wrote this article not only to 
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PROGRAM TO DEMONSTRATE 
AUTHOR! 0»6. M0RR 



THE MEMORY SIZE 
NUMBER EQUAL TO 



PROMPT 
1 LESS 



THE USE OF "SUPER SOUND" 



MUST BE ANSWERED Wl TH A 
THAN SUBROUTINE ADDRESS* 



AD 



DEFINT A-Zi ' INTEGER VARIABLES RUN FASTER WITH BASIC 
AD * 327381 ' RESERVED MEMORY AD0RESS FOR ROUTINE 
(CHANGE TO 20448 FOR 4K BAN SYSTEM) 
120 HI x |NT(A.D/256)» POKE 16527»HI» ' SET UPPER BYTE OF USR( ) ADDRESS 
130 LO « «D-HI*?56i POKE 16526*L0t • SET LOWER RYTE OF USR( ) ADDRESS 
140 FOR I = AD TO AD*28» ' LOAD RESERVED MEMORY WITH ROUTINE 
150 READ DT: POKE I »DT 
160 NEXT I 



170 DATA 



if 14» e> 
255» 13» 



237« 
40* 4 



91" 61« 64. 69* 47- 
16' 246« 24. 242. 



37- 



OU « 
FV * 
SS » 
GOTO 
ENO 



DEMONSTRATION EXAMPLE OF RANDOM TONE GENERATION 

> 2048*RND( 10)i ' DURATION MUST BE INTEGER MULTIPLE OF 256 



5*RND(100)i • FREOUENCY VALUE 
USR(DU*FV)i ' GENERATE TONE 
2101 ' GO ANO DO I T AGAIN 



ANOTHER WAY OF EXPRESSION 



MUST BE NON-ZERO INTEGER 



205' 127» 10t 62» 

230' 3» 179» 211* 

32* 241* 201 
180 ' 
200 
210 
220 
230 
240 
2S0 
960 
9 70 
980 
990 ' 

1000 DEFINTA-Z 

1010 AO-32738: HI »l NT( AD/256) » P0KE1652 7»HI i P0KE16526«A0-H I «>256 
1020 FOR l«AD TO AD*2«* REAO DT: POKE I • DTi NEXT 
1030 DATA 205»127» 10»62»1» 14»0.237»91» 61 » 64.69* 47»230OO 79-21 1« 

2 55»13»48»4» 16»246»24i242'3 7»32»241«2«1 
1040 SS*USR( 2I48*RND( 1»)*5*RND( 100) ) >GOTO1040 

BAS.IC program to generate random tones. 



132 • 80 Microcomputing, May 1980 



make a couple of bucks, but 
also to try to stimulate those 
Microcomputing readers lucky 
enough to own TRS-80 comput- 



ers to write some super pro- 
grams that can make use of the 
ability to create sound effects. I 
hope that it is apparent from 



reading the article how easy 
and simple it can be. 

If you would like to avoid typ- 
ing the Race program into your 



REM 

REM 
REM 

RE*" 



THE GAME OF RACE AS M00IFIED «Y DA VE M0RP» 
MEMORY SIZE MUST RE SET TO 



*?, 



3?737 FOR 16* BAM 
2044 7 FOR 4K RAM 

5 REM 

6 OEFINTA-ZtClEAR10fl 
8 AC«32739»H|r|NT(AD/256)tP0ME16S?7.HliP0KE16 5?6'AD-MU?56! 

REM CHANGE AO TO EQUAL 20448 FOR 4K RAM SYSTEM 
10 FOR l*AC TO AO*28i READ DT: P0«E I »0Tt NEXT 

12 OATA 2B5» 127» 1I»$2» 1»14»i»237»91«6V«4t«9» 47*238 »3»17<W11»255i 13 
4*1 6»24€» 24*242 »37*32»?41i 231 

15 CLSiPRI MCMRf(?3)»PRI NT»26« ••TOUCH RIGHT A RRQW( ■ :CHR$( 94) ;■ )■ : PH NT*34? t 
■TO STEER RIGHT":PR| NT«464t"0R LEFT ARR0W( " ;CHRJ( 03) :■)■ 1 PR| NT* F?4» 

•TO STEER LEFT" 

16 PRIM«7rKt"P*E$S ENTER WHEN P£A0Y" 

18 A$«INKEY$:IFA$s"*THfcNPR|NT«84."*«« RACE ••♦" t SS =USB( 51 19) » PRI NT«« 4 . 

■ ■tSS«USR(5115)«G0T01« 

28 SC«0«SOx0:DS=298«Ari6824rBs28«CaatD=1tF«e«G*25:H54KJK Y=144?0jB| rP4: 

LE*32»STxl5999«PT=255sLC*1S3iRCs166:CLS 
2 5 F0RI*8T01SIPRINTSTRING$(8* , *");TAR(P*C)STRING5( 64-R -<>■•■) :J*r>T 
30 k*PEEK(KY)SlFXAND*l THENG =G* 1 1 GO T05P 
40 IFLEAN0XTHENG«G-1 
50 IFRND(8)«3THEND=-0 
60 BsP*D»IFR<3THENRr3«D*-D 
78 J»8*C t IFJ>60THENH=60-C« J= a *C:Ds-0 

100 P0«EAfH:?0KEA*1tMiArST-»6iSSsUSR(0S) JFRI NTSTRI NGI(«»42) : 
18 5 IFRND(8)«3THENPRINTST«ING«(RND(C)»32);"0":TA C '(J)STPI NGK64-J.4?) : 

ELSEPRINTIA3( J)STH|NG$(64-J»42): 
110 Pl*PEEK(A):P?=PEEK(A*l)tlF(P1=32)ANO(P2 = 32)THE».'120ELSEIF(P1 = 79) 

0R(P2=79) TMEN160ELSE140 
120 P0KEA*LCtP0KEA*1»RC«F«F-UI FF<1THENFs40«C«C-HDS=265*2*C : I FC<6THEN200 
125 G0T03? 

140 SC«SO1tG>INT(C/?*»)tPRINT"r0U R»N OFF THE POAOI" 
150 FORT=0TO50STEP10«FORI *2 77T0267STEP-1»SS»USR( l*T)iNEXTI INEXTT:F0RI «1019 

TO102 3tPR|NTSTRING$(H.4?);TAR(B*C)STRINGS(f.4-Ji42) ;tSS«USR(l )INEXT« 

GOTO30 
160 SD =SD* 1 1 PH s5 72*B*C /2 : FOR T *0 T038» PR I NT«PH." POTHOLE" ; »SS»USR( 900) tPRI NT«PH» 

• •;iSS«USR(820)iMEXTiPRINT«960*JiGOTO30 

200 CLS»PRINTCHR$( 23) iPRI NTiPRI NTJPRI NT"GAME VER" 1 PRI NT: PR I NT: 

PRINT"Y0U RAN OF THE ROA D" ; SC ;■ T HES" 
285 PRINTiPRINT«PRINT"AND FELL I NTO" ;S0;"P0TH0LESI ■ 
218 PRINTtPRINT«PRINT"WANT TO PLAY AGAIN (Y OR N) 7" 
22 A$«INKEY$iSS = USR(2 590«RND(5)*»NO(5))HF(A$="Y")OR(Al="N") THEN??* 

ELSE220 
225 IFA$>"Y»THENRUN 
2 50 CLSIX*0:FO?.I*8TO50:R*RND( 18) I X«X»3*R«PRI NT»X»"RYE B : :SS«USR( 758*R)iNEXTi 

F0Rla5l1T02 57STEP-1:SSaUSR(l)tNExTtCLS 

Race program using the Super Sound subroutine. 



computer, I can provide a prere- 
corded cassette for $6. Send a 
check or money order to D. G. 
Morr, 6599 Red Fox Rd., 
Reynoldsburg OH 43068, with a 
note requesting the Race pro- 
gram and include your name 
and address. ■ 



C ENTER J 



ADJUST HL "EG 

■ — 4 REG 

I -»C REG 

(4«J0M|— E REG 




^ RETURN J 



REGISTER - ySi 

A - Output value 

B - WORKING FREQUENCY COUNTER 

C - MINOR DURATION COUNTER 

I - TRS-80 OUTPUT MASK 

H - MAJOR DURATION COUNTER 

L - FREOUENCY VALUE STORAGE 

Fig. 3. Super Sound flowchart. 



UCSD Pascal* for TRS-oW Model II 



The Standard Package: Operating System □ Compiler D Screen Editor D Filer □ Library D Z-80 Assembler 
□ Patch Utility Program D 280 page User Manual □ Jensen & Wirth Pascal Reference Manual □ Bowles' Beginners 
Guide To UCSD Pascal □ tutorial disk. 



Plus: 

• Single or double density diskettes in one or more 
standard formats. 

• Disk Formatting program. $350 

• Configuration program for serial I/O. Complete 



Optional Utility Programs: 

• File conversion— 

CP/M* to Pascal $50.00 

TRSDOS to Pascal $50.00 

•Z-80 Disassembler/Dump Program $50.00 



^% 



PCD SYSTEMS 



323 Keuka St. • Penn Yan • New York 14527 • 315-536-3734 



•Trademark of ihe Regents of the University of California 



'Trademark of Tandv Corp. 



{Trademark of Digital Research Corp. 



■ Reader Service — see page 162 
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GENERAL 



Use block movement to re-order your programs. 



Cutting and Splicing BASIC 



R. B. Nottingham 

do The Book Rack 

1619 SE 3rd Ct. 

The Cove 

Deerfield Beach, FL 33441 



The technique of loading a 
program to follow an exist- 
ing program ("Whip File Wipe- 
outs," by Roger L Pape, Micro- 
computing, July 1979, p. 39) of- 
fers several advantages to the 
TRS-80 programmer. Reducing 
keyboard entries to save time 
and minimize errors is one and 
storing a library of routines to in- 
sert at any point in a program is 
another. 
Suppose we have a program 



divided into three blocks. Block 
A is numbered from 10 to 990, 
block B 1000-1990 and block C 
2000-2990. We wish to re-order 
the program so that instead of 
ABC the sequence is ACB. Nor- 
mal renumbering techniques 
will not permit this. 

Load a renumbering routine 
and then the program. Delete 
10-990 and 2000-2990. The re- 
maining block B is renumbered 
and moved from 1000-1990 to 
2000-2990. Save the renum- 
bered block B on tape. 

Now, reload the program, 
delete block B (Delete 
1000-1990) and renumber the 
program from the beginning so 
that it is now numbered 
10-1995. Then using Mr. Pape's 
method, load block B. Presto! 
ACB. This may seem like a lot of 



work, but it saves both the time 
of re-entering 100 lines of code 
and the errors. 

Linear regression and 
graphing data with either a hori- 
zontal or vertical axis are two 
routines which may be useful in 
a variety of programs. We can 
now load these, either in the pro- 
cess of entering a program or 
after the program is completed 
and de-bugged. (Being able to 
de-bug a program in small sec- 
tions is often advantageous.) 

One word of caution in adding 
material as part of the main pro- 
gram or as subroutines: Vari- 
ables must be consistent. Try 
adding a line at the beginning 
and end of the section to trans- 
late: A = Z, B = Q, R=Y, etc., 
followed by Z = A, Q = B, Y = R, 
etc. 



To refresh your memory, the 
splicing procedure is as follows: 

PRINT PEEK (16633). PEEK (16634) 

This determines the end ad- 
dress of the program in memory. 
The computer will display two 
numbers: 

206 74 

POKE 16548, 204 • POKE 16549. 74 

If two cannot be subtracted 
from the first number, add 256 
before subtracting and de- 
crease the second number by 
one. 

CLOAD (program to be added) 

READY 

POKE 16548.233 : POKE 16549, 66 

Now LIST the program and 
RENUM if required. ■ 



$ 



Bl SINESS ACCOl \TING 

Software 



Flexible cUmt write-up general ledger system designed by 
a CPA and developed by a computer specialist for CPA's. 
accountants and general businessmen provides large-scale 
computer features at micro-computei soliware costs: 

* designed for use by present employees 
' allows for up to 500 accounts 

' departmental financial statements including 
budgets 

* retains standard journal entries 

* automatic balancing of transactions 

* fast entry A posting of transactions 

* easy to follow audit trail 

* conventional accounting symbols used 



For 9-program package 
send S495 to. 



diskette with user manual 



Task Comptter Apm.kwhoxs 
Dayton, Ohio PO Box 24001 



45424 
(513) 233-2118 
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t -l\1 %v#- wi 
<.i n h ■<.■ m t n ,*'-' ■ k*?27 



1721 Greeniea Om>© 
Clearwater. Florida 33615 
Tel (813)4464283 



IDUCATIOIMAL SOFTWAR 

Level II— Mm 4K 

MTHA For age* 4 7 — teaches 
alphabet recognition; 
Reinforcement — a 'happy "! 
face 
SIGMA For Grades 1-3— A random I 
series of one-digit ack1ltion| 
problems lie 4 + 5s 9) 
Reinforcement— FHish the 
puck through trie goal 
I Simple to uw-No depressing tke INTll 
| key 

Uch S5.95-Both for $10.00 



Mercer Systems lac. 

87 Scooter Laae 

Hlcksvllle. N.V. I 1801 
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3 FEET BY 2 FEET 



trs-80' Registered Trademark of Tandy Corp. 



GIANT! - VIDEO SCREE 
DISPLAY WORKSHEET 

PRINTED ON ENAMEL STOCK AND THEN VARNISHED SO IT IS WASHABLE 
—No more looking in Level II Manual for Video Layout. 



A MUST FOR SERIOUS PROGRAMERS! 




plus 1.50 postage 




CHECK WRITER! 



r °ven 



* TRS-80 - 32K • 2 Disk Drives 

(No Printer Required) 

* 8 Accounts Per Check 

* Balances Check Book • Keeps 

Current Balance 



* LIST OUT Checks. Accounts 

or Deposits (To Screen or Printer) 

* 100 Accounts 

* Complete Edit Routines 

plus 1.50 Postage 



GOLF HANDICAPPER! 



Sorts all Members by Name, lists Handicap. f>. ^*llf> 

Number of Games Played. ■ I Ca%l#*m 

Latest Date Played w ^tJ 

...A MUST FOR ^***m ** — 

TOURNAMENT PLAY! 524.90 

TE DOCUMENTATION!!! P,US ' 5 ° P ° Stafle 



CASH REGISTER 

48K - 4 Disk Drive 

Handles Cash Sale. 

Charge Sale. Deducts from 

Inventory. Post to Charge 

Accounts - Gives Receipt. 

Prints 2 Line Message at 

Bottom of Receipt. 



TRS-80' 32K - 1 Disk Drive - Printer t 

100 Members 

Figures Golf Handicaps by USGA 

(USGA Approved Method) 
Prints Handicap Card for Each Member 



COMPLI 




masier charge 



MICON MICRO SYSTEMS 
P.O. Box 360 
Azle, Texas 76020 
Ph. 817 444-1719 ext. 2 



• 212 



All Texas Residents 
add 5% Sales Tax 



CRISS-CROSS 

48K - 4 Disk Drive 

Total 5400 Names. Address 

Phone Numbers - Puts in 

Phone Number Order. 



COMING SOON!! 

MAKING LABEL PULLER 

(■■kit M*«uta| i S»wl 

HOLE niNCM F0I BINDING 

CMPVTBI (UIAOKS 



ii 



•• 



HISPED 

TAPE OPERATION 

A NEW SOFTWARE 
PROGRAM 

for the TRS-80™ 



•Seven speed ranges 

•Saves, Verifys and loads array data or 

programs (BASIC of SYSTEM) 
•Can transfer array data to tape up to 30 

times faster than normal operation using 

PRINT* 
•Printer control features — Auto carriage 

return, line spacing, page spacing, screen 

image 

Write for full specifications or send 
$24. 95 fck or mo) + $1 .00 P/H (Calif, 
residents add 6% sales tax) 



PALOMAR 
SOFTWARE 

170 S. Palomar Dr. 
Redwood City, Ca. 94062 

• 228 



<?uicks€t 

GET YOUR WARP SPEED UP 




"TRS-80 i* a registered trademark of TANDY CORP." 



FOR REALLY FAST TRS-80* 

GRAPHICS 

• A cassette SOFTWARE addition to your 
TRS-80' level II BASIC. 

• Lets you draw graphics with your computer 
the same way you draw on paper. 

• AN BASIC commands work normally. 

• Draw shapes, large alphabetical characters, 
etc. ten times taster, more easily and using less 
memory then level II. 

• SETs one graphic spot at a time. 

• Does not use strings or POKE. 

• Paint your TV screen white in 4.S seconds 
(TRS-80 takes 45 seconds). 

• Draw the starship ENTERPRISE, above, begin- 
ning at any point on the screen, in 0.3 seconds 
(TRS-80 takes 4 seconds and uses twice as 
much memory). 

• No effect on your warranty. 

WINKING CURSOR 

• Play this cassette program into your TRS-80' 
and the cursor starts winking. 

• It keeps on winking until you turn the machine 
off (not affected by NEW). 

IQS-1 QUICKSET on cassette $7.95 ( 

JWC-1 WINKING CURSOR on cassette $4.95 j 

OW-1 Both on one cassette $9.95 1 

| Add $1 .00 per order handling charge. 

(PA residents— add 6% tax) 

JMSCorp 

P.O. Box 18083 Pittsburgh, PA 15236i 

(412)855-7017 

* TRS-40 * a CaOefnarti of tM RMK) StWCk Division ot Tftndy COfporati 
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GIN! 

YOUR TRS-80 CAN BE 
A TOUCH OPPONENT 

CIN RUMMY 2.0 plays a strong game, good 
enough to challenge an expert player 
Plays a full regulation game, keeps score to 
game level, allows rearrangement of 
player's hand, and changes strategy to 
counter its opponent's play. Hours of good 
card playing, a fascinating program, one 
you'll enjoy playing against and trying to 
beat. mcr-1 $14.95 

Checkbook PLUS solves the problem of 
monthly bank statement reconciliation 
No cumbersome tape record keeping. Just 
do your checkbook once a month and let 
Checkbook Plus handle all the details and 
find the errors. MCB-1 $9 95 

CALCULATOR PIUS is an on-screen or print- 
ing calculator, with chain and mixed calcu- 
lations, memories for answer storage or 
calculations with constants, item count 
and on-screen or printed review of long 
add-and-subtract operations. Optional 
dollar format. MPC-1 $9 95 

CHECKBOOK PLUS and CALCULATOR PLUS 

both on one cassette. MC-2 $14 95 

THE LISTMAKER Powerful, versatile pro- 
gram allows entry of 400 names with 
codes in 16K. Lists by code on-screen or to 
printer. Sorts, provides editing of name or 
code, dumping, loading lists, ideal for clubs, 
organizations, small businesses, individuals. 

MLM-1 $9.95 
• 90 

MANHATTAN SOFTWARE, Inc 

P.O. Box 5200 Grand Central Station 

New York City, New York 10017 



v Reader Service — see page 162 
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UTILITY 



Why POKE your screen onto the line printer 
when you can use this flexible routine? 



LPVIDEO 



David E. Powers 

10 Wilben Ct. 

New Hyde Park, NY 11040 



Often I want hard copy of 
everything on my TRS-80 
video screen. A favorite method 
to print out the TRS-80 display is 
to POKE the printer driver ad- 
dress into the video control 
block in dedicated RAM (POKE 
16414, 141: POKE 16415, 5). 
Thereafter every PRINT com- 
mand will act as an LPRINT. 

The trick is clever but very lim- 
iting. While it is in place, the 
CRT is inactive, the keyboard is 
tied to the line printer (you won't 
see what you are typing until 
you press ENTER) and output re- 
quired on the screen will be sent 
only to the printer. The POKE 
routine and the one to cancel it 
(POKE 16414,88: POKE 16415, 4) 
are second-best techniques. 

What's LPVIDEO 

LPVIDEO (line print video), 
presented here in two versions, 
is a generalized subroutine to 
produce hard copy of everything 
on the TRS-80 screen, without 
interrupting the video display or 
compromising readability of key- 
board input. Both versions pro- 
duce identical machine lan- 
guage software which may be 



FF8C 



3C88 
37E8 



08228 
98238 
88248 
80256 
88268 
88278 



88218 
80328 
80330 
80340 
00358 
80368 
88378 
88388 
80390 
00480 
80410 
00420 
00430 



FF16 CD36FF 
FF19 7E 
FFlil 32E837 
FF1D 23 
FF1E0C 
FF1F 3E40 

FF21 B9 
FF22 28F2 



FT 24 CD36FF 
FF27 3E6D 

FF29 32E837 
FF2C 84 
FF2D 3E18 



Listing 1 

PttOHl TO PRINT T>C CONTENTS OF THE VIDEO SCREEN TO THE LINEPRIHTER 

PROGRHH IS WRITTEN FOR TRS-80 48K, USING TRSOOS 2. 2 

TO REWRITE FOR 32X SYSTEMS, ALL fCORESSES BEGINNING "FF 1 SHOULD BE REWRITTEN 

TO BEGIN "BF ■ 
TO REWRITE FOR 16K SVSTEKS. ALL fCORESSES BEGINNING 'FF' SHOULD BE REWRITTEN 

TO BEGIN '7F " 



ORG 8FF8CH ; TRANSFER POINT IS FFBCK DECIMAL 65292. 

; FOR THE 48K VERSION 

VIDEO EOU 3C88H ; STARTING ADDRESS FOR VIDEO MEMORY. 

LPADOR EOU 37E8H ; LINE PRINTER ADDRESS. 



00458 



FF0CF5 
FF0DC5 
FF0E E5 
FF8F 21003C 80478 
80408 
FF12 0688 80490 



START PUSH 
PUSH 

PUSH 
ID 

LP 



00510 
88528 
60530 



00578 LDLINE LD 



NXTBYT 



80610 

80628 

80638 

80648 

80650 

00660 . 

80678 

80688 

80690 I 

00700 

80718 , 

00728 

00730 

08748 

00758 

08768 

86770 

88788 

88798 

88818 



CPU 

LD 

LD 

INC 

INC 

LD 

CP 

JR 



CULL 

LD 

LD 

INC 

LD 



INITIALIZATION SEQUENCE 



Ff 
BC 
HL 
HL. VIDEO 

8,8 



.PROGRAM USES AF.BC AND DE REGISTER PAIRS 

.THEREFORE, IT IS NECESSARY TO PRESERVE THE ENVIRONMENT 

. REGISTER PAIR HL HILL BE USED AS A POINTER TO 

VIDEO SCREEN LOCATIONS. 

; INITIALIZE REGISTER 8 TO COUNT NUMBER OF LINES THE PROGRAN 

HAS COPIED FROM VIDEO TO THE LINE PRINTER 



THIS SECTION OF CODE LORDS A LINE OF VIDEO INTO LINE PRINTER 

C.6 . INITIALIZE REGISTER C TO COUNT NUMBER OF CHARACTERS 

THE PROOBW HAS COPIED FROM A LI* TO THE LP BUFFER 

LINE 570 IS THE START OF THE LINE LOADING ROUTINE. 
CHEKLP -CALL ROUTINE TO CHECK IF LP IS REHDV TO RECEIVE DATA 

A, (HL> ,0N RETURN FROM CHEKLP, LOAD BYTE FROM VIDEO TO A REGISTER 

(LPADDR).A ; THEN LOAD A REGISTER INTO THE LP BUFFER 

HL ; SET HL POINTER TO NEXT VIDEO BYTE. 

C ;BUf> THE COUNTER 

A.40H .CHECK TO SEE IF 46H (DECIMAL 64) CHARACTERS HAVE 

BEEN LOADED INTO THE LP BUFFER (1 E. . FULL VIDEO LINE) 
C ; BY COMPARING THE COUNT TO 4BH 

NZ,NXTBVT , IF NOT, THEN GET THE NEXT BYTE, OTHERWISE FALL THROUGH 



THIS SECTION OF CODE PRINTS A FULL LINE 



CHEKLP 

aeon 



<LPfK*>.A 



A.10H 



FF2F 80 


80828 


CP 


B 


FF3O20E2 


00830 


JR 


NZ, LDLINE 


FF32E1 


00840 EXIT 


POP 


HL 


FF33 CI 


86650 


POP 


BC 


FF34 Fl 


■MMg 


POP 


AF 


FF35C9 


88878 


RET 





,CALL ROUTINE TO DETERMINE LINE PRINTER READINESS 

;0N RETURN FROM CHEKLP, LOAD A REGISTER WITH 

ASCII CARRIABE RETURN 

.SEND CARRIABE RETURN TO LINE PRINTER 

iBUM? THE LINE COUNTER 

-CHECK TO SEE IF 18H (DECIMAL 16) LIMES HAVE 

BEEN PRINTED (IE. A FULL SCREEN) 

. IF FULL SCREEN NOT SCT PRINTED. GET NEXT LINE 
.OTHERWISE, RESTORE THE ENVIRONMENT 



.RETURN TO CALLING PR03W1 
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MM 








MM* 








MM! 








M92I 




THIS SECTIM OF CODE CHECKS FM MIHTER REMINESS. 




MM 






mm 


M94i CHEUP 


LO ft (LPMOR) ;PLRCE PRINTER STRTUS IN THE R MISTER. 


FF39 OTF 


MM 


•IT 7.R ; IS PRINTER ROW? 


FF3RCR 


MM 


RET 2 ilFSO, RETUM 


FF3C CMF 


M97» 


BIT 3.R . IS HUNTER IN LINE RUT DISRRLED? 


FF3E 2M 


MM 


JR 2.DSMLD ; IF SO AW TO NESSWE BUTINL 


FMOT7 


MM 


■IT fcR ; IS PRINTER OFF LINE? 


FT42 28F2 


MM 
Mil ; 
MM; 
MM ; 

MM i 


JS Z, CHEKLP ; IF NOT. CHECK PRINTER STRTUS UNTIL RERDY 




MM i 


THIS SECTION OF COOE LORDS NO PRINTS RDVISORV OF PRINTER STRTUS 




MM ; 




F44 21MF 


MRTi OFFLIN 


LD HL.N5S62 . IF PRINTER OFF LI*. HL POINTS TO STMT RMESS 




MM; 


OF RDV1S0RV NESSRBE 


F47 1983 


MM 


JR OSPLRV .THEN AW TO DISPLRV SECTION. 


F49 21MF 


MiMDSMLD 


LO HLNSSM . IF PRINTER DISMLED. HL POINTS TO STMT RODRESS 




*Ut | 


OF RDVISORV NESSWE 


F4CD5 


M12I DSPLAY 


PUSH OE ■ SET UP TO CULL THE LEVCL2 CRT DISPLRV ROUTINE 


F4DFDE3 


M1M 


PUSH IV 


F4F 71 


Ml* LOOP 


LD ft (HL> ;PUT aVTE FNOH NESSWE INTO R MISTER. 


mi am 


M1M 


CRLL 33H .CRLL LEVEL2 DISPLRV ROUTINE 


FF53 23 


Mitt 


INC HL BJHP NESSRBE POINTER 


FFM 3EM 


M170 


LD ft! ;SET UP TO CHECK FOR END OF NESSROE 


FFK BE 


M1M 


CP (HL) | IS IP 


FF37 2« 


M1M 


JR NZ.L00P i IF NOT. GET NEXT BVTL 


F39F0E1 


H2M 


POP IV iRT END OF NESSRSL RESTORE IV NO DC 


mm 


H2M 


POP DE 


FF5C2JJ2F 


M22I 


LD HLEXIT ;SETUPFMRPUMTOCRU1«PR00RH. 


FF3FE3 


M2JR 


EX (SP).HL 


ma 


M2M 


BET ,MCX TO EXIT FM FINRL RETUM 




M2M 








MM 








M27I 








M2M 








M2M 




NESSROE NCR 




MM 






FF61 31 


■mi HJSSM 


DEFN 'PRINTER NOT RERDV. DECK PRPER RND SNITCH 


FFC2 32 


FFC 49 


FFM 4E FFC3 34 FFK 43 FF«7 32 FM M FFM 4E FFM 4F FM 3 


4 F« » F« 52 Fff 43 Fff 41 FFTt 44 FF71 39 FF72 2E FF732I FF74 21 


FF73 43 


FFK 41 


FF7743 FF7I43 FF79M FF7HM FF71M FF7C41 FF7DM FF7E 


43 FF7F 32 FM 20 FM 41 F02 4E FF83 44 FFM 21 FFM 53 FFKS7 FFB749 


FMM 


FFM 43 
M339, 
M3Mi 


FFM 41 FFM2E FF8C 21 FFM 20 FFtt 20 M320 ; 


FF8FN 


MM 
MM. 
M37I; 
MM i 


0EFB • ; lERHlNRTOX IMICRTES END OF NESSRBE. 


FFM St 


M3M KS02 


DEFN 'WINTER NOT IN LINE CHECK POHER OR CRBX 


FFM 32 


FFM 49 


FF934E FF9434 FF9343 FFK 52 FF972R FM « FF994F FFM 5 


4 FF» 29 FF9C49 FFM « FFX 21 FFJF 4C FFM 49 FFM 4E FFM 43 FFtt 2£ 


FFM 21 


FFR5 2I 


FFK 43 FFR7M FFM« FFM 43 FFM « FM 21 FRC 50 FM 


4F FFRE V FFRF 43 FFH32 FM 21 FFK 4F FFB32 FM 21 FFIS 43 FFK 41 


FFR7 42 


FFM4C 
M41I; 
M42R; 


FFM43 FFM2E FFM2I FFKM FFMM MM . 


FFK M 


M43f 

81440, 
MM i 

M4M , 


DOT • TERHIWTDR 


m 


M470 


EM 


MM TOTRL EMMS 




LOOP FF4F 






HSSfil FT61 






DSPLRV FF4C 






H5S62 FFM 






OFFLIN FF44 






DSNJLD FF49 






EXIT FF32 






OCKLP FFK 






NKTIVT FFK 






LDLIK F14 






STMT FFC 






LPR3CR I7EB 






VIDEO JCM 






HEX MACHINE LINE 


ADDRESS CODE NUMBER LABEL OPERATION OPERANDI) COMMENTS 


FF16 CD3eFF 00600 NXTBYT CALL CHEKLP ;CALL ROUTINE ... . 


FF19 7E 


006T0 LD A.(HL) ;ON RETURN ... . 


FF32 El 


00840 EXIT POP HL OTHERWISE ... 






Example 1. Assembly Language Format. 



left in protected memory as a us- 
er service routine (USR) avail- 
able to any BASIC program. 
Printing the entire CRT screen 
becomes as easy as selectively 
calling the USR from a BASIC 
program. 

Listing 1 is an assembly lan- 
guage program in Zilog Z-80 
mnemonics. Don't be threat- 
ened if assembly language is 
new to you; this article steps 
through the listing slowly. In ad- 
dition to learning about assem- 
bly language programming, 
you'll acquire a very useful sub- 
routine. Listing 2 produces the 
same result as Listing 1, but 
uses BASIC to POKE instruc- 
tions into memory. It's an easy 
way to get LPVIDEO running so 
you can appreciate how well ma- 
chine language works. 

Program Theory and Operation 

The assembly language pro- 
gram (Listing 1) was produced 
using the TRS-80 Editor/Assem- 
bler. Even if you don't have an 
Editor/ Assembler, you can still 
load the program through BA- 
SIC, or with T-BUG (a Radio 
Shack programming and debug- 
ging package) or, if you are us- 
ing a disk-oriented system, with 
the TRSDOS DEBUG com- 
mands. 

Listing 1 is in seven-column 
format (see Example 1). Column 
three, the only unbroken col- 
umn, is a series of line numbers. 
Column four contains optional 
labels, as in line 600, labeled 
NXTBYT. Rather than specify an 
address as hexadecimal FF16, 
for example, I can refer to that 
address by the arbitrary label, 
NXTBYT. 

This is particularly useful, as 
the address FF16H was deter- 
mined after I wrote the program, 
when the assembler worked on 
the source code (in columns five 
and six) to develop column one 
(the RAM hexadecimal ad- 
dresses) and column two (the 
machine language object code). 
Column two contains the actual 
program. Everything else is sup- 
porting material. 

LPVIDEO begins with the de- 
finition of its first memory loca- 
tion (FFOCH. decimal 65292, at 
line 350) and the assignment of 
values to the labels VIDEO and 
LPADDR. VIDEO, set at 3C00H, 
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INTERNATIONAL 
ELECTRONICS TOUR 

VISITING FOUR ELECTRONICS SHOWS 

in 

KOREA, JAPAN, TAIWAN & HONG KONG 

October 8-22, 1980 

•••Air Transportation Via Japan G Northwest Air- 
lines. 

•••Participants May Return to the U.S. Individually 
Within 35 Days From the Date of Departure. 

• •• First Class Hotel Accommodations. 

• •• Daily Show Transportation — To and From 

Hotels. 

• * 'Overseas Co-Host: Electronics Industry Assn. of 

Each Country. 

• •• Arrangements For Group and Individual 

Business Meetings. 

• •• Business Briefings by Local Governments, 

Chamber of Commerce, and U.S. Embassy Com- 
mercial Officers. 
•••Price: $2020.00 Including All U.S. and Foreign 
Taxes. 

As described by Wayne Green in January 1 980 Microcomputing 
Editorial 

Write for information about Electronics Tour To Far East 
MARGO EVANS Commerce Tours International, Inc. 
870 Market Street, Suite 742-744 
San Francisco, CA 94102 



►^259 



When you've 

got something 

to say to a 

TRS-80 M 




you can say it best ^ W I 

with Scott's VET/1 Voice Entry Terminal 

Now. enjoy your I KSBU more with voire entry to basic 
programs or games Solid-state reliability, easy to use. 
Key features i ii( hid. 

■ Performance comparable to systems costing $10,000 
or more — at hobbyist prices 

■ High ■coifacy, last recognition 

■ Supplied with demo programs and software tools 

■ Connects directly to icrara printer I/O port 

■ Simple to program — only Level II BASIC required 

'.1 iki your computer more productive and enjosublt! 
For details, call 81 7/387-1054 or nriln: 



INSTRUMENTS 
8i5No«iriElro • Damon. T«m 76201 



mt«k»v>ri T a4 



is the address of the first byte of 
the CRT memory. 

The TRS-80 is memory- 
mapped. Frequently input/out- 
put data are channeled through 
RAM addresses rather than 
through the 256 ports of the Z-80 
microprocessor. The display oc- 
cupies 1024 bytes from 3CO0H 
to 3FFFH (decimal 15360 to 
16383). LPADDR stands for 
37E8H (decimal 14312). the loca- 
tion in RAM at which software 



addresses the Centronics paral- 
lel port, used by most Radio 
Shack printers. 

The remainder of LPVIDEO 
may be regarded as six modules 
(see Table 1). The initialization 
sequence preserves the data in 
register pairs AF, BC and HL 
Register pair HL, which will be 
used as a pointer to successive 
screen locations, is loaded with 
the starting address of the video 
memory. 



Listing 2 



! R EM ♦»♦ BASIC PROGRAM TO POKE LPVIDEO INTO HIGH MEMORY 

2 REM *** 48K DISK VERSION 

3 REM *** SEE ACCOMPANYING ARTICLE FOR MODIFICATION DETAILS FOR 

SMALLER SVSTEMS AND NON-DISK SYSTEMS 
4 

5 ' 

6 POKE 16553.255 CORRECTION FOR ERROR IN SOME LEVEL!' CHIPb 

7 ' 



18 REM *** INITIALIZATION SEQUENCE 

20 DATA 245. 197. 229. 22, 0, 60. 6, 

30 ' 

40 ' 

50 ' 

60 REM *** LOAD LINE OF VIDEO INTO LP BUFFER 

70 DATA 14, 0, 205 

80 DATA 54, 255 'MODIFY THIS LINE. IF NECESSARY, ACCORDING TO 

DIRECTIONS 
90 DATA 126, 50. 222, 55, 35, 12, 62, 64. 185, 32, 242 
100 ' 
110 ' 
120 ' 

130 REM *♦* PRINT LINE 
140 DATA 205 
150 DATA 54, 255 'MODIFY THIS LINE, IF NECESSARY, ACCORDING TO 

DIRECTIONS 
160 DATA 62, 13. 50- 232, 55, 4, 62. 16, 184, 32, 226. 225, 

193. 241, 201 
170 ' 
180 ' 
190 

208 REM *** CHECK FOR PRINTER READINESS 
210 DATA 58, 222. 55. 203. 127, 200, 282. 111. 40, 9, 202, 

119, 40, 242 
220 ' 
220 
240 ' 

258 REM *** LOAD AND PRINT ADVISORY OF LP STATUS 
260 DATA 33 
270 DATA 144, 255 'MODIFY THIS LINE, IF NECESSARY, ACCORIDNG TO 

DIRECTIONS 
280 DATA 24, 3, 33 
290 DATA 97, 255 

DIRECTIONS 
300 DATA 213, 253, 
246, 252, 
318 DATA 50, 255 

DIRECTIONS 
320 DATA 227. 201 
330 ' 
340 ' 
350 ' 

260 REM **♦ MESSAGES 
270 DATA 80, 82, 72, 
69. 65, 68, 
380 DATA 80, 
84, 
290 DATA 88, 
78- 
400 DATA 32. 
76. 
410 ' 
420 
430 
440 FOR \V.- -244 TO -66 

ACCORDING TO ACCOMPANYING DIRECTIONS 
450 PEAD &'/. 
460 POKE V/., B/. 
470 NEXT 



MODIFY THIS LINE, IF NECESSARY. ACCORDING TO 

229- 126. 205, 51, 0, 35, 62, 0, 190, 22, 

225, 209- 33 

MODIFY THIS LINE, IF NECESSARY, ACCORDING TO 



65, 

67, 
82. 
32. 

80, 
69. 



78. 
89, 
69. 
46 
78, 

rz, 

87. 
32. 



84. 
46, 

82. 
22. 
84, 

ra 

69- 
32, 



69, 

32, 
32. 
32. 
69. 
69. 
82. 
32. 



82. 32, 

32. 67, 

65, 78. 

32, 

82. 32. 

46, ZZ. 

32, 79, 





78. 
72. 
68, 

78. 
32. 

82 



79, 

69, 
32, 

79, 

e? 

32. 



84, 

67, 

82. 

84. 
72. 
67, 



32, 
75, 
87, 



69, 

65, 



82, 



67, 
6S 



MODIFY THIS LINE. IF NECEESARY. 
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CHEKLP, the subroutine be- 
ginning at line 940, examines 
the printer's status. If the print- 
er is ready the subroutine exe- 
cutes a return to the calling lo- 
cation. LPADDR contains 5DH 
(decimal 93) when the printer is 
ready. The only other possible 
data at LPADDR are FFH (deci- 
mal 255) if the printer is not on 
line (e.g., power off), DFH (deci- 
mal 223) if it is on line but dis- 
abled (e.g., out of paper), or BFH 
(decimal 191) if it is unable to re- 
ceive data because it is printing. 

Is the Printer Ready 

Bit test operations determine 
which printer condition is true. 
Bit tests were chosen rather 
than compares because they 
save program space by minimiz- 
ing loads and register usage 
and by diminishing the number 
of pushes and pops to and from 
the stack. The bits of each byte 
are numbered through 7, from 
right to left, corresponding to 
the power of two represented by 
that bit. Accordingly, printer 
condition reports may be ex- 
pressed as in Example 2. 

The instruction at line 940 



loads LPADDR data into the A 
register. Bit 7 is (reset) if and 
only if the printer is ready. At 
line 950 we test for readiness. 
Line 960 is a return on zero; if bit 
7 is reset, control returns to the 
calling address. If bit 7 is 1 (set) 
the program continues with the 
next instruction, testing bit 5 of 
the datum at LPADDR. Bit 5 is 
if and only if the printer is on line 
but disabled. 

If the printer is disabled the 
program executes a jump to 
DSABLD (line 1100), which dis- 
plays a status advisory. If the 
printer is enabled but otherwise 
unready, the subroutine tests bit 
6, which is set if the printer is 
disabled (already eliminated) or 
off line. 

If bit 6 is set, the program 
jumps to OFFLIN (line 1070) to 
print another message. If no 
jump is executed, the program 
assumes that the printer was 
unready because it was printing. 
The program returns to CHEKLP 
and repeats the loop until it is 
exited by printer availability, dis- 
ability or off line status. 

When the printer is ready, the 
loading module (LDLINE, begin- 





READY 




decimal 63 


3FH 


binary 00111111 






PRINTING 


decimal 191 


BFH 


bin 


ary 10111111 






DISABLED 


decimal 223 


DFH 


binary 11011111 






OFF LINE 


decimal 255 


FFH 


binary 


1111111 








Example 2. Printer Condition Report. 




FFee 
FFie 


■> 
-> 


43 


E5 


21 


ED 


FE 22 


16 


40 


El 


CD 


2D 


« 


F5 C5 
37 23 


E5 21 
0C 3E 




ee 


3C 


06 


00 


0E 00 


c6 


26 


FF 7t 22 Efi 


FF26 


■> 


40 


B9 


20 


F2 


CD 36 


FF 


3E 


0D 


32 


E8 


37 


04 3E 


10 88 




FF38 


•> 


29 


E2 


El 


CI 


Fl C9 


3fi 


E8 


37 


CB 


7F 


C8 


CB 6F 


28 09 




FF40 


-> 


C8 


77 


28 


F2 


21 90 


FF 


18 


03 


21 


61 


FF 


D5 FD 


E5 7E 




FFM 


-> 


CD 


33 


00 


23 


3E 00 


BE 


20 


F6 


FD 


El 


Dl 


21 32 


FF E3 




FF6B 


«> 


C9 


50 


52 


49 


4E 54 


45 


52 


20 


4E 


4F 


54 


20 52 


45 41 




FF7B 


*> 


44 


59 


2E 


20 


20 43 


48 


45 


43 


4B 


20 


50 


41 se 


45 52 




FF88 


=> 


20 


41 


4E 


44 


20 53 


57 


49 


54 


43 


48 


2E 


20 20 


20 ee 




FF9B 


*> 


50 


52 


49 


4E 


54 45 


52 


20 


4E 


4F 


54 


20 


49 4E 


20 4C 




FF«0 


-> 


49 


4F 


45 


2f 


20 20 


43 


48 


45 


43 


48 


20 


50 4F 


57 45 




FFBe 
FFC0 


=> 


52 


20 


4F 


52 


20 43 


41 


42 


4C 


45 


2E 


20 


20 20 


00130 




FF 


FF 


"FT FF FF Pf 


FF 


f-F 


FF 


FF 


FF 


FF 


PP PP PF FF 




FFOe 


>> 


FF 


FF 


FF 


FF 


FF FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF FF 


FF FF 


FFEe 


»> 


FF 


FF 


FF 


FF 


FF FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF FF 


FF FF 


FFFB 


=> 


FF 


FF 


FF 


FF 


FF FF 


FF 


FF 


FF 


FF 


FF 


FF 


FF FF 


FF FF 






Example 3. 


Memory Dump of LPVIDEO. 




STARTING 


STARTING 










MODULE 






ADDRESS 




LINE 










FUNCTION 






FFOC 






00440 




INITIALIZATION SEQUENCE 






FF14 






00570 




LOAD VIDEO LINE TO PRINTER BUFFER 


FF24 






00750 




PRINT CONTENTS OF PRINTER BUFFER 


FF36 






00940 




SUBROUTINE CHECK FOR PRINTER READINESS 


FF44 






01070 




PRINT ADVISORY ON PRINTER STATUS 


FW 






01310 




MESSAGE AREA CONTAINS ASCII STRINGS 










Table 1. Program 


Modules 












•xclusiv* I 
Disk Software • 

from ELCOMPCO 



I 



CMDtTR: Oeato a msk Ma of oentrnenda and **e 
cut* tM wnoi* «• nrtft one comnsend or auks H tor a 
turnaey syetem from boor ic basic end beyond. 

OOSOWD: Swbmil an ens** belo! DC* command* al 
once, tana ill beck and let Mo comptrter eo it •'» 

COPYHLi For tingle die* titer* Tranitera any tile 
from on* da* to another fTRSDOS 2 2 7 i ontyl 

CMDSTR, DOSCMO. AND COPYFILK 
AM 1 on tape $1« K. 



• 



t 



VtOUM* Damn* screen graptstc* into beak tile of 
print el a te wonts Recreate grapMcs qwcfcri by typing 
nan. 

QRFPRNT: Foal aardcepy el screen grapnlea. For 
13* Col l inepr inters 

OATMAKEN Creel* disk at* of boetc dele statements 
front any Moca of memory, faere* -nto a basic program 

for poking back Into memory 

VIOUMP, QRFPRNT AMD OATMAKER 
A* tVee on tape $15 oo. 



iMafll 

WHEEL Word guessing game nit* g reptile* and 
eostnd 

MASTERMD: Number gueeesng game with grapn.cs 
and sound. ^ e3 

WHEEL AND fdASTERMO 
fig* 121 On l*e* SUac 

I' *** I COD. I^Wl 

P.O. Dox 6133. Albany CA 94706 



I 



• 



WORD PROCESSING PRINTER 




IBM SELECTRIC TERMINAL 

$795. 00 

TRS-80-DIRECT PARALLEL 



FUNCTIONALLY TESTED 

CABLES INCLUDED 

NO SOFTWARE REQUIRED 

OFF LINE TYPEWRITER 

DELIVERY STOCK TO 5 WKS 

PACKING AND HANDLING '25 

SHIPPING COLLECT 

CASHIER CHECK MONEY ORDER 



RS232 SERIAL 
AND/OR „ 
CENTRONICS 

TYPE 
PARALLEL 
INTERFACE 

only «345. 00 




McClain & Associates. Inc. 

5104 East 65th Street 

Indianapolis. Indiana 46220 

(317) 842-0526 



*/•*» 



r ^ 

L ^ J 



-Reader Service — see page 162 
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VERSION 

48K DISK 
48KNONDISK 
32K DISK 
32KNONDISK 
16K DISK 
16K NON DISK 



ORG * HEX TRANS 
ADDRESS 

OFFOCH 
0FF4CH 
OBFOCH 
0BF4CH 

7FOCH 

7F4CH 



DEC TRANS 
ADDRESS 

65292 
65356 
46906 
48972 
32524 
32588 



MEMORY 
SIZE? 

65291 
65355 
48907 
48971 
32523 
32587 



Table 2. Entry Points and Memory Allocation. 



LSB* OF 
ADDRESS 48K DISK 48K NON 32K DISK 32K NON 16K DISK 16K NON 



17 


36 


77 


36 


77 


36 


77 


18 


FF 


FF 


BF 


BF 


7F 


7F 


25 


36 


77 


36 


77 


36 


77 


26 


FF 


FF 


BF 


BF 


7F 


7F 


45 


90 


D1 


90 


D1 


90 


D1 


46 


FF 


FF 


BF 


BF 


7F 


7F 


4A 


61 


A2 


61 


A2 


61 


A2 


4B 


FF 


FF 


BF 


BF 


7F 


7F 


5D 


32 


73 


32 


73 


32 


73 


5E 


FF 


FF 


BF 


BF 


7F 


7F 



'Denotes )•■•! significant byt« 



Table 3. Machine Language Modifications. 



ning at 570) copies one screen 
line from the CRT memory to the 
printer buffer. 

Line 610 loads a byte from the 
video display, indicated by reg- 
ister HL, into the A register 
which is written to LPADDR and 
sent to the printer buffer by line 
620. HL is incremented to point 
to the next video byte. Register 
C is incremented and checked 
for 40H (decimal 64, the number 
of characters on each line). Until 
C contains 40H the program 
loops back to NXTBYT (line 600). 
When C contains 40H, control 
drops through to line 750. 

At line 750 the program enters 
the print module, which calls 
CHEKLP. If the printer is ready, 
the A register is loaded with DH 
(decimal 13), an ASCII carriage 
return, which is sent to the print- 
er at line 780 and forces a print 
of the buffer contents. 

Register B, which counts 
lines, is incremented and 
checked for 10H (decimal 16). If 
B contains less than 10H the 
program has not examined 
every video line. Control then 
jumps to LDLINE, zeroing the C 
register, beginning a load of the 
next video line. If B contains 10H 
control passes to EXIT, which 
restores the environment and 
executes a return to the calling 
program. 

The section of code that out- 
puts printer advisories begins at 



line 1070. OFFLIN loads HL with 
the starting address of MSSG2 
(line 1390). DSABLD does the 
same for MSSG1 (line 1310). The 
program continues with DSPLAY 
(line 1120) which calls the Level 
II display routine at ROM ad- 
dress 33 H. Each of the mes- 
sages is established in memory 
with the DEFM pseudo-opera- 
tion. DEFM is not a Z-80 opera- 
tion but an assembler instruc- 
tion to reserve a block of mem- 
ory for ASCII values of a mes- 
sage string. After each message 
is a 0, entered with the DEFB 
pseudo-op that defines a byte 
according to the programmer's 
wishes. The loop in DSPLAY re- 
peatedly calls the Level II dis- 
play routine until it encounters 
the terminator, an invalid 
ASCII code. 

A TRSDOS DEBUG dump of 
the memory area containing the 
complete machine language 
program is reproduced as Exam- 
ple 3. The enclosed section be- 



Li sting 3 



HX "SLIDE NUMBERS INCLUDE 



460 CLS 

470 PRINT 9 128, "THE FOLLOWING" 

SCENES OF " S* " " 
480 FOR V/.=l TO NX 
490 PRINT SNJKNJO; 

500 NEXT 
510 PRINT 

520 PRINT "<R>EQUEST PHVSICFlL DESCRIPTION. " 
530 PRINT "<S>ELECT NEW CfiTEGORV " 
540 PRINT "<D>ELETE SLIDES FROM LIST " 
550 PRINT "<R>DD SLIDES TO LIST " 
560 fl»=INKEV$ IF fl«- M " THEN 560 
570 IF fl$=-P" THEN X«USR0(X> REM *** SHIFT P 

580 IF fl$="R H THEN 1570 
590 IF fl$="S" THEN 350 
660 IF H*="D" THEN 7000 
610 IF A^-IV THEN 9000 
620 00T0 560 



ginning at FF0CH and ending at 
FFBEH is LPVIDEO. The dump 
should aid the reader in produc- 
ing LPVIDEO using T-BUG or the 
DEBUG commands in TRSDOS. 

Calling the Subroutine 

LPVIDEO is useful when run- 
ning a BASIC program. The 
memory size inquiry of the BA- 
SIC initialization dialogue 
should be answered with a num- 
ber smaller than the transfer ad- 
dress (entry point) of LPVIDEO. 
Responses are suggested in 
Table 2. The standard transfer to 
LPVIDEO is by a USR call. 

Programs in disk BASIC (or 
G2's Level III by Microsoft) 
should include instructions 
such as DEFUSR0 = &HFF0C 
that defines user service routine 
as having a transfer address of 
FF0CH (decimal 65292). In Level 
II BASIC it is necessary to POKE 
the hexadecimal address into 
memory one byte at a time the 
least significant byte first— 12 
(0CH) into 408EH (decimal 16526) 
and 255 (FFH) into 408FH (deci- 
mal 16527). 

Disk BASIC and Level III call 
the subroutine with an instruc- 
tion like X = USRO(X), while Level 
II users should try X = USR(X). 
Processing is branched to 



LPVIDEO, the screen is printed 
(or the user is advised why it is 
not) and BASIC regains control 
of the program. 

Most of the BASIC software I 
write accepts keyboard input via 
the INKEY$ statement, a tech- 
nique particularly suitable for 
entering LPVIDEO. A typical 
calling sequence, illustrated in 
Listing 3, is part of a hypotheti- 
cal BASIC program. 

Line 560 begins the input rou- 
tine. If the user types a shift P 
the BASIC program calls LPVID- 
EO. Since the subroutine re- 
turns control to line 580, the IN- 
KEYS routine is continued and 
awaits further user input. 

Modifications for 

Different TRS-80 Configurations 

LPVIDEO is written for a 
Model I disk-oriented TRS-80 
system with 48K of user RAM. It 
resides near the top of the 48K 
memory. The very top is not em- 
ployed as TRSDOS 2.2 uses the 
highest 64 bytes of memory 
when BASIC or BASICR is 
loaded. 

The program is easily modi- 
fied for other configurations and 
is adaptable to other computer 
systems. Use Table 2 to deter- 
mine origin addresses for pro- 



VERSION 




DATA ON LINE * 






LINE 440 




80 


150 


270 


290 


310 






48K DISK 


54.255 


54.255 


144.255 


97, 255 


50.255 


FOR l% = 


= -244 TO -66 


48K NON DISK 


119.255 


119.255 


209,255 


162,255 


15,256 


FOR IV. ■ 


- -179 TO -1 


32K DISK 


54.191 


54,191 


144,191 


97,191 


50.191 


FOR IV. = 


-16628 TO -16450 


32K NON DISK 


119,191 


119,191 


209,191 


162,191 


15,191 


FORIV.z 


-16563 TO - 16385 


16K DISK 


54,127 


54,127 


144,127 


97,127 


50,127 


FOR IV. 


-- 32524 TO 32702 


16K NON DISK 


119,127 


119,127 


209,127 


162,127 


15,127 


FORIVo 


= 32589 TO 32767 






Table 4. 


Modifications to Listing 2 
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ducing LPVIDEO with an assem- 
bler program. Table 2 also pro- 
vides answers to the memory 
size inquiry and addresses to be 
specified for a USR transfer. 

Table 3 lists the least signifi- 
cant bytes of RAM addresses 
and the data those addresses 
should contain for various con- 
figurations. The most signifi- 
cant byte for all 32K addresses 
is BF, for 16K, 7F. 

Table 4 suggests modifica- 
tions of Listing 2, the BASIC pro- 
gram to POKE LPVIDEO into 



memory. Tables 2, 3 and 4 con- 
sider a TRSDOS 2.1 system to be 
a non-disk system. 

Conclusion 

LPVIDEO is a useful routine. 
Like every program, it can be 
changed or enlarged. A particu- 
larly enticing challenge is to 
write a patch to the TRS-80 key- 
board scan so that it will look 
continuously for a shift P and 
execute LPVIDEO, regardless of 
what other task is being under- 
taken, much the same way that 



shift & stops background 
tasks. 

The user may also want to 
modify the program so that it 
prints only up to the current cur- 
sor position. Working with 
LPVIDEO can give the novice as- 
sembly language programmer 
valuable experience using im- 
portant instructions and techni- 
ques. ■ 
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STATIC IS THE MAJOR CAUSE OF 
PROGRAM AND DATA LOSS 

Compuguard 2000tm can help eliminate 
static problems now! Compuguard is spe- 
cially formulated to reduce static electric- 
ity in all types of carpeting. You simply 
spray Compuguard on carpeted and fabric 
covered surfaces near your data process- 
ing equipment and Compuguard immed- 
iately goes to work eliminating trouble- 
some static. 

You can't afford to be without the protection 
Compuguard 2000tm will give. Before you 
lose another program, ORDER TODAY!! 
Your Compuguard 2000tm Starter Kit. at 
the low introductory price of $12.95, in- 
cludes a half gallon of Compuguard 2000tm. 
spray bottle and complete instruction. 
YOUR SATISFACTION IS 100% 
GUARANTEED OR YOUR 
MONEY BACK!!! 
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statements con be copied to other port* of the program or combined to 
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STYLE 



Why enter figures in 

decimal, when you can use these routines! 



Fractional Input 



David R. Cecil 
Dept of Mathematics 
Texas A & M University 
Kingsville TX 78363 



Would you like to be able to 
enter fractions such as 
-8/5.6 with the INPUT state- 
ment in BASIC? How about 
variable length numeric data 
with one INPUT? 

If you've tried simultaneous 
equations, matrix-inversion 
problems or even sorting, then 
you know how handy these two 
features would be. 

The programs given here 
allow fractions and/or variable 
length data streams. They are 



written for the TRS-80 Level II, 
but should work with any ex- 
tended BASIC having the string 
functions LEN, MID$, RIGHTS 
and VAL. 

If you are only going to input 
one number at a time and wish 
to be able to enter a fraction for 
your input, then see Program 1. 
(More extensive REMARKS 
about Program 1 appear in Pro- 
gram 3 starting at line 1140.) 

To call Program 1 your main 
program will need the statement 
INPUT C$: GOSUB 2010. For ex- 
ample, Program 2 displays x and 
5x for user-chosen x's. 

To use Program 2 type RUN. 
When ? appears type in your nu- 
meric value, such as - 17/681 or 
12.3, and press the ENTER key. 
Use the BREAK key to terminate 
this program. 

If you want to enter more than 
one number per INPUT and also 
be able to enter fractions, then 



2000 REM "THE INPUT IS STRING C ' 

2010 FOR J = 1 TO LEN(C$) 

2020 IF MID$(C$,J.1) = "r THEN 2050 

2030 NEXT J 

2040 V = VAL(C$): GOTO 2060 

2045 REM'THE OUTPUT IS THE NUMBER V * 

2050 V = VAL(C$)A/AL(RIGHT$(C$,LEN(C$)-J)) 

2060 RETURN 

Program 1. 



10 INPUT C$: GOSUB 2010 
20 PRINT V, 5"V 
30 GOTO 10 



Program 2. 



take a look at Program 3. 

To use Program 3 type RUN 
1010. When the prompt ? of the 
INPUT statement appears, type 
the first entry followed by exact- 
ly one space, then the second 
entry, then one space, etc. (for 
example, - 1 &3/4B - 5. 086167/ - 
9.1). Do not use commas to 
separate the data values or you 
will get the message ?EXTRA 
IGNORED. Don't put a space 
after the last number entered or 
between a negative sign and its 
value and do not put more than 
one space between numbers, or 
you will have some unwanted 



zeros in your output. You are 
permitted entries such as -3/4, 
3/ -4 or even -3/ -4 if you 
prefer that to 3/4. 

The dimension of the output 
matrix D given in line 1050 is the 
maximum. You may wish to use 
a smaller DIM size. 

Output matrix D is available 
for future use, other than for just 
displaying its contents as is 
done in lines 1090-1110. If line 
1085 is changed to 1085 RE- 
TURN, then this program, like 
Program 1, would be nice to use 
with the INPUT statement. To 
utilize Program 3 as a subrou- 



1001 REM A PROGRAM TO INPUT FRACTIONS 

1002 REM *OR VARIABLE LENGTH NUMERIC DATA* 

1003 REM 'WITH THE INPUT STATEMENT* 

1004 REM 'BY DAVID R. CECIL* 
1010 CLEAR 1200: INPUT B$ 
1020 LET B = 1: LET K = 1 

1025 REM 'LINE 1030 ADDS A SPACE AT THE END" 

1026 REM *OF THE INPUT STREAM * 
1030 A$ = B$ + "W 

1035 REM 'THE OUTPUT IS THE MATRIX D. IT IS' 

1036 REM 'DIMENSIONED TO BE THE LENGTH OF STRING A* 
1040 Z = LEN(A$) 

1050 DIM D(Z) 

1055 REM "CHECK TO SEE IF STRING A HAS A SPACE* 

1056 REM "(A BLANK) AT POSITION I* 
1060 FOR I = 1 TO Z 

1070 IF MID$(A$.I.1) = '■»•' THEN GOSUB 1130 
1080 NEXT I 

1085 REM 'OUTPUT MATRIX D HAS SIZE K-1 WHERE* 

1086 REM *K-1 IS THE NUMBER OF ITEMS ENTERED.' 

1087 REM "DISPLAY THE OUTPUT. ONE ITEM PER LINE* 
1090 FOR S = 1 TO K-1 

1100 PRINT D(S) 
1 110 NEXT S 
1120 END 

1125 REM "CHECK TO SEE IF THE ENTRY BETWEEN TWO' 

1126 REM "BLANKS HAS A DIVISION SYMBOL APPEARING" 
1130 CS = MID$(A$,B.I-B) 

1140 FOR J = 1 TOLEN(CS) 
1150IFMID$(C$,J,1) = "/"THEN 1180 
1160 NEXT J 
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tine, use INPUT B$: GOSUB 1020 
in place of an INPUT statement. 

As an illustration, Program 4 
displays the numbers entered 
as decimals, followed by the 
original entry (whether frac- 
tional or not) and does a sort of 
numbers at the same time so 
that the results appear in as- 
cending order. 

To use Program 4 be sure Pro- 
gram 3 is still loaded. Then a) 
change line 1050 to read DIM D 
(Z), E$(Z); b) change line 1085 to 
read RETURN; and c) change 
line 1210 to read E$(K) = C$: 
B = I + 1:K = K + 1. After 
these changes type RUN and in- 
put fractions or whatever 



numeric data desired when ? ap- 
pears. 

The division sign "/" in lines 
1150 and 1180 could be replaced 
by " + " if you will be entering 
numbers in a form such as 
2.7081 + 6.952. 

You might notice that Pro- 
gram 3 can be shortened from 
line 1150 to the end by inter- 
changing some lines and 
eliminating a GOTO. The for- 
mulation presented here was 
used so that omitting lines 1140 
through 1 190 (if your data has no 
fractions occurring but you 
want to input a stream of 
numbers with one INPUT) will 
have no effect on the rest of the 
program.! 



1170 GOTO 1200 

1175 REM 'ASSIGN THE RESULT OF THE DIVISION TO* 

1176 REM 'THE OUTPUT D(K)" 

1180 D(K) = VAL(C$yVAL(RIGHT$(C$.LEN(CS)-J)) 
1190 GOTO 1210 

1195 REM 'IF / DOES NOT APPEAR THEN ASSIGN D(K)' 

1196 REM *TO THE NUMBER APPEARING BETWEEN TWO BLANKS* 
1200 D(K) = VAL(C$) 

1210B= I + 1: K = K + 1 
1220 RETURN 

Program 3. 

10 CLEAR 1200: INPUTBS: GOSUB 1020 

20 FOR S = 1 TO K-1: FOR J = 1 TO K-2 

30 IF D(J) > D(J + 1) THEN 80 

40 NEXT J,S 

50 FOR S = 1 TO K-1 

60 PRINT D(S). "ORIGINAL ENTRY =b"; E$<S): NEXT S 

70 END 

80 A = P(J + 1): D(J + 1) = D(J): D(J) = A 

90 B$ = E$<J + 1): E$<J + 1) = E$(J): E$(J) = BS 

100 GOTO 40 

Program 4. 
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TRS-80 users 

Learn FORTH 

FORTH is a structured high level language that dramatically 
cuts program development time You can expand the 
FORTH language by defining new operations and data types. 
FORTH programs are compiled to reduce memory space and 
speed execution . 

tiny FORTH is a complete version of the powerful FORTH 
language tailored to the TRS-80. The tinyFORTH system 
includes FORTH, a text editor, an assembler, graphics, and 
cassette I/O. 

Learn FORTH on your own computer. The tinyFORTH 
user's manual contains hundreds of examples to teach you 
FORTH in a hands-on style 
tinyFORTH for 16k level II TRS-80: 

Cassette and full documentation $29.95 

Documentation only t 9.95 

All orders are fully guaranteed. And SI .50 for postage and 
handling Order with check, money order. Visa, or 
Mastercharge. 

Write for a FREE booklet describing FORTH 



The Software Farm ^109 

Box 2304 Dept. AI8 Reston, VA 220M 



BATTLE OF MIDWAY 

a realistic simulation of this WWII battle 

YOU can now recreate this air-sea 
battle by commanding the individual 
carriers and squadrons of fighters, dive 
bombers and torpedo bombers into 
action! 

Level II 16K $9.95 

FOOTBALL 

• 9 offense and 6 defense plays 

• Fumbles, interceptions, time-outs, 
onside-kicks — all included! 

• Play against the computer or a live 
opponent 

Level II 16K $9.95 
All programs recorded on high quality 

cassettes. 
Send cheque or money order to: 
Computer Simulations Canada 
#144-3225 Uplands Dr. 
Ottawa, Ontario, Canada 
K1V 9V3 ^261 



/P€€D CONTROL 

for your 

TR/-80 

TRS-80 SPEED CONTROL 

Plans — very simple circuit 
allows wide range of control 
over speed of listing or run- 
ning programs. Connect to 
TRS-80 Port, or any Z-80. $15 
check to: Golden Circuits, P.O. 
Box 404, Golden, Co. 80401 . 



C 



GOLDEN CIRCUIT/ co. 

PO BOX 404 -265 

GOLDEN, COLORADO 80401 



1* BIDAM Now Available T 
For TRS-80 L 



Basic Indued Direct Ace**, Method (BIOAM) is a disk 
access method designed to simplify programming of disk 
applications, reduce disk I/O and space requirements and 
improve response time, while maintaining a key-sequenced 
index to a data Hie. BIUAM permits programmers to place 
emphasis on applications rather than file accessing tech- 
niques, sorting, searching and disk space management 

BIDAM functions are performed by invoking basic sub- 
routines which include: key searching, changing, addition 
and deletion. Each subroutine returns a status code in- 
dicating the completion status of the requested function 
and a record number to enable direct retrieval of any 
record on file with one (I) I/O operation. 

BIDAM ON DISKETTE WITH SAMPLE 
APPLICATION $79.00 

TRS-80 is a tiademam o' ine Radio Suae* Division ol Tandy CotpwatHxi 

Task Computer Applications 

Dayton, Ohio PO Box 24001 
45424 
(513) 233-2118 ^220 



t\\y L (Accounting Computer Technology) 

BILLPAYER 1 

For TRS 8016K Level II with line printer 
Automate your bill paying! 

• Prints your check automatically 

• Prints a list of each day's checks 

(detail & total) 

• Built in "edit" and "void" check 

routines 

• Works with friction or line-fed 

printers 

• Holds up to 29 payees with or with- 

out descriptions and amounts 

• "Other" selection lets you enter 

any other payee you choose 

• Save time and have fun paying your 

bills (up to $9,999.99) 

• Recorded on cassette with printed 

simple instructions. 
J3fc*lT (25% off — introductory 
offer) Send 129.75, check or 
money order, plus *2.75 postage 
& handling to ACT c/o J. Pate 

P.O. Box 435 
*- 260 McMinnville, OR 97128 
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UTILITY 



If you want to PEEK inside your 80, try this neat utility. 



MEMORY DUMP 



Allan S. Joffe W3KBM 
1005 Twining Road 
Dresner PA 19025 



Every program starts with an 
idea or a premise. But only 
with some tenacity, does it de- 
velop into a finished product. 
The premise here is that by us- 
ing the following program frag- 
ment you can print the contents 
of memory. 



5 CLS 

10 FORX = 0TO100 

20 PRINT PEEK(X); 

30 NEXT X 



Running this program, you 
will now see the contents of 
memory locations to 100 or the 
first 101 memory locations of 
your BASIC ROM. Remember, 



is a very real number. (This infor- 
mation is in the memory map of 
your Level II book.) 

When printed the notation of 
the program is decimal. How- 
ever, to be truly useful, the print- 
out should be in hexadecimal 
form 

If you modified line 10 to read: 

10 FOR X = TO 3000 

the BASIC ROM contents will 
print out and you will find that 
the numbers (in decimal) run 
from to 255 with no number in 
excess of 255. In hex notation, 
255 (decimal) = FF. 

To represent the hexadecimal 
value of any memory cell we can 
make up a decimal to hexadeci- 
mal "converter." 

Hex Conversion 

Hex values for numerals to 
15 can be displayed by a single 



5 


CLS 


10 


FORX=0TO255 


20 


G = X/16 


30 


B = G-INT(G) 


40 


IF G - B>9 PRINT CHR$«G - B) + 55); ELSE PRINT G - B; 


50 


IF 16-B>9PRINTCHR$((16.B) + 55); ELSE PRINT CHR$«16.B) + 48); 


60 


NEXTX 




Initial Program Listing 



character— through 9 and A 
through F— with the alphabeti- 
cal characters A through F used 
to represent the values 10 
through 15 in decimal. For the 
sake of display uniformity we 
will use two characters to repre- 
sent each value. To display this 
initial set of hex characters we 
will append a "leading 0" to 
each one: 00 07 09 0C OF etc. 
Any hex equivalent of a decimal 
value in excess of 15 is automat- 
ically two characters wide (in 
the range of to 255 decimal.) 

The base or radix of hex is 16. 
If we take any value in our con- 
sidered range of to 255 deci- 
mal and divide it by 16, we will 
get a whole number plus a re- 
mainder of so many sixteenths. 
Even if a number is divided by 



sixteen evenly, the result is still 
a whole number plus a remain- 
der of zero sixteenths. 

Now let us look at the MSB 
and LSB. In our two digit hex 
representation the leftmost 
character is the MSB (most sig- 
nificant bit). It will have the 
greatest value in determining 
the complete value of the num- 
ber. The righthand character is 
the LSB (least significant bit) of 
the pair and has the least value 
to add to the numerical value. 

Here is an example. Let us 
break the decimal 93 down into 
its component parts. The 9 is 
worth nine tens or 90 and is the 
MSB, for obviously its numerical 
worth is greater than that of the 
3 which is three ones and is the 
LSB. The sum of the MSB + the 



5 CLS 

6 INPUT START ADDRESS IN DECIMAL - ;S 
8 INPUT END ADDRESS IN DECIMAL" ;E 

10 FORX = STOE 

12 IF J = 16 THEN J =0 

13 IF J=0ANDX>STHEN PRINT X - 1;:PRINT CHR$<11); 
15 A = PEEK(X) 

20 G=A/16 

30 B = G-INT(G) 

40 IF G - B>9 PRINT CHR$((G - B) + 55):ELSE PRINT CHR$((G - B) + 48): 

50 IF 16-B>9 PRINT CHRS«16.B) + 55);ELSE PRINT CHR$«16.B) + 48): 

55 PRINT CHR$(32); 

60 J=J + 1;NEXTX 

Finished Program: Decimal to hex memory dump 
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LSB represents the full numeri- 
cal value of this number. 

If we take the same numerical 
pair, 93, in hex, we can do the 
same thing, remembering that 
the MSB is worth the value of 
the digit multiplied by 16. 

The LSB is determined as in 
decimal with the exception that 
in decimal the greatest value of 
the LSB is nine, while in hex its 
greatest value is 15, or to be 
more precise, F. 

Thus, 93 in hex is the sum of 
nine sixteens + three ones, 
which translates to 144 + 3 or 
147 in decimal notation. 

Determining Hex 

Now we are ready for the next 
step of the game plan. Divide the 
decimal 93 by 16. The answer is 
five + thirteen sixteenths. In 
this way we have determined 
that the MSB of this number is 5. 
The LSB is now multiplied by 16 
to turn it from a fraction into an 
integer, making it 13. Since we 
are now speaking in hex, 13 is 
annotated as D. Thus 93 in 
decimal is 5D in hex. 

Here now is what our program 
has to do: 

1. It has to take any decimal 
number from to 255 and divide 
it by 16. 

2. The program has to recognize 
the whole number and print it 
properly. That is it must print the 
number as letters A through F if 
the number is in excess of nine. 

3. The program must recognize 
the fractional remainder and 
multiply it by 16. Then it has to 
print it properly to the right of 
the first digit (again if this num- 
ber is larger than nine, it is repre- 
sented by characters A through 
F. 

4. Finally, the program must rec- 
ognize the presence of a "single 
digit number" (numbers to 15 
decimal) and it must append a 
to the left of the digit (03.0D, 
etc.) 

First we must come up with a 
routine that will divide a number 
in the desired range (0 to 255) by 
sixteen and give a separate 
identity to the integer and the 
fractional portions of the an- 
swer. 

Take any mixed number our 
possible division could produce, 
for example 5-7/16. Separate 
and give an identity to the frac- 



tional remainder by using the 
INT function. If X = 5-7/16 then 
X-INT(X) would be the frac- 
tional remainder. 



5 CLS 

10 input x 

20 G = X/16 

30 8 = G-INT(G):PRINTB 

40 GOTO 10 



The above program fragment 
has separated this fractional re- 
mainder and given it an identity 
B. 

It follows that if G represents 
the whole number plus the frac- 
tional remainder and B equals 



The value of G - B will range 
from to 15, as X ranges from 
to 255. The ASCII code values 
for numerals to 9 ranges from 
48 to 57. The ASCII code values 
for the letters A through F run 
from 65 to 70. In addition, the 
value of 16* B ranges from to 
15 as the fractional remainder 
ranges from 0716 to 15/16. If you 
carefully examine the condi- 
tions set forth in lines 40 and 50 
you can see how the computer 
sorts out the given facts and 
prints the proper two characters 
in hex format for each decimal 
value of X that we input. 



15 A - PEEK(X) REM this is a new line 

20 G^A/16 REM this is Old line 20 modified 

Example 1 



12 IF J = 16 THEN J =0 REM this is a new line 

13 IF J =0 THEN PRINT CHRS<11); REM this is a new line 

60 J = J + 1 NEXT X REM this is old line 60 modified 



Example 2: The Counter 



6 INPUT "START ADDRESS IN 0ECIMAL";S REM new line 
8 INPUT "END ADDRESS IN DECIMAL ";E REM new line 

10 FOR X = S TO E REM changed line 10 



Example 3 



this fractional remainder, that 
G - B equals the whole number. 
Thus we have given the whole 
number a programmable identi- 
ty just as we did for the fraction 
B. 

We now have enough infor- 
mation from these logically de- 
veloped facts along with the use 
of some string functions to con- 
struct an initial program. 

In line 10 we are Inputting our 
range of interest. The next two 
lines are the same with the ex- 
ception of line 30 where we had 
printed B. This is no longer of 
use as it was for demonstration 
only. 

Line 40 says in English: If the 
whole number portion of X is 
greater than nine print the ASCII 
character which is represented 
by the whole number + 55. If 
G - B is NOT greater than nine 
just print G - B. This line takes 
care of the MSB. 

Line 50 serves the same func- 
tion for the LSB. 



The Bug 

At this stage of the game we 
are very lucky not to have run in- 
to a gotchagotcha or bug as it is 
commonly called. Don't cheer 
just yet, for if you run the pro- 
gram it will fill your screen with 
the proper values, BUT the print- 
out looks funny. 

The numbers from to 159 
(decimal) will run together so 
that one pair is difficult to 
distinguish from another. The 
condition worsens for the 
numbers 160 to 255. 

We need to add one more line 
to the program. 

55 PRINT CHR$(32); 

This line tells the computer 
that each time it prints an LSB, it 
is to print a CHR$(32), or a blank 
space, before it processes the 
calculations for the next num- 
ber. 

Now that our program is in 
some sort of shape, though with 



a few formatting bugs (display 
format problems), let's add the 
necessary instructions to allow 
the program to dive into the 
memory locations and print the 
values in hex. To the existing 
program add the lines in Exam- 
ple 1. 

Line 15 uses the PEEK func- 
tion to examine the contents of 
the memory cell locations in line 
10. In our present instance this 
would be the first 256 locations 
of the BASIC ROM. If you had 
wanted to examine the contents 
of the video memory locations 
line 10 would read: 

10 FOR X = 15360 TO 16383 

The display format problem 
and its cause are clear enough. 
Because of the 64 characters 
per line limit the final two char- 
acter hex number of a line is 
split between the end of that line 
and the beginning of the next. 

The solution is to print no 
more than 16 sets of hex charac- 
ters per line. 

We can insert a counter into 
the program to add a carriage 
return after the sixteenth pair of 
characters on a line (Example 2). 

However, now when we run 
the program we find another 
problem— split lines. 

If you examine the print state- 
ments in the program you will 
see that all but the second half 
of line 40 use some form of 
CHR$ function. Let's change 
this to agree in format with the 
rest of the print statements: 

:ELSE PRINT CHR$«G - B) + 48); 

Now when you run the pro- 
gram there should be no prob- 
lems with the display format. A 
good rule, as demonstrated by 
the built in "gotcha" is to be 
consistent with your formatting 
of print statements. Like every- 
thing in life this may not be 
universal, but it is a good way to 
stay out of trouble— most of the 
time. 

Printing Location 

Finally, we will modify line 13 
so that the decimal location will 
print out after the last hex digit 
on each line. Line 13 will now 
read: 
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13 IF J =0 AND X S THEN PRINT X-1; 
:PRINTCHR$(11); 



It may help a bit to examine 
why the line is written this way. 
If you run the program and spec- 
ify a starting address (S) of and 
an end address (E) of 16, the pro- 
gram will print cell to cell 16 for 
a total of 17 cells, as it prints out 
from S to E inclusive. Cell 0, re- 
member, is in reality cell one 
physically. 

When the program prints out 
the first sixteen cell contents 
and then prints 15 at the end of 



the line, it means that while this 
cell is the sixteenth cell printed, 
that it is (in decimal) cell number 
15 because of the fact that zero 
is the first location. This re- 
mains true even if the S value is 
NOT the figure 0. 

An S (start) value of 53 and an 
E (end) value of 69 would give an 
X value of 68 at the end of the 
line. Looking at it another way, 
you are printing the value of cell 
53 and then printing 15 more 
values to make up the total of 16 
values in the line (53 + 15 = 68). 
This is the end of line value. 



Changing the Area 

If we modify the input state- 
ment we won't have to modify 
line 10 every time we want to 
change the area of memory to 
be examined. Add the new lines 
in Example 3. 

One last bell and whistle. 
After each full screen has been 
printed, you might like the pro- 
gram to halt, while you examine 
it. Then when you hit the ENTER 
key, the program should con- 
tinue to the next full screen. I 
suggest a counter, similar to the 



one that limits the line length to 
sixteen hex characters, and 
some way of making the ENTER 
key a trigger for program 
resumption. 

There is a lot of meat here to 
digest. Follow the program frag- 
ment one step at a time and your 
own homebrew programs will 
develop more easily. 

The computer will tell you if 
you make a mistake— some- 
times— but it will only do what 
you direct it to do, which is the 
main reason why debugging is 
such a popular indoor sport. ■ 



You will appreciate this accessory every time you turn your computer on' 

READ THIS 

• Give your CRT the luminous greencharacters found on the very expensive computer 
systems 

• Add a professional look to your system and your programs 

• Dramatically improved contrast for easier reading and improved graphics 
We manufacture an optically correct, 1 /8" plexiglas" screen that mounts easily over the 
CRT on your video monitor. This is a quality accessory that enables your TRS-80" 
monitor to produce the luminous green characters identical to those found on expensive 
terminals For business applications this means enhanced appearance and reduced eye 
strain, for the hobbyist, graphics are brighter and bolder The screen may be easily 
removed -no modification to monitor 

▲ Screen for Model I $19.95 
Screen for Model II $24.95 
^142 VISA - Mastercharge 
National Tricor, Inc. / 3335 Greenleaf Blvd., Kalamazoo. Ml 



We ship within 
24 hours. 

30-day money back 
guarantee 

49008 / 616-375-7519 



TRS-80* STRUCTURED 
BASIC 

Now available lor TRS-80 disk systems 



A pre-compiler adding performed pro- 
cedures, case structures, repeat while, until 
and many other structured language state- 
ments to the already powerful Level II 
BASIC. Diskette $50.00, Listing $35.00, 
Manual purchased separately $10.00. 



313 Meadow Lane 
Hastings, Michigan 49058 

(616) 945-5334 
(Dealer inquiries invited) 

•84 

VISA & MASTERCHARGE ACCEPTED 

'TRS-80 is a trademark ol Tandy Corp 



WORD 

Processing 

BASIC 



ULC 



NUM 

TERM 
APOS 



UPPER /lower case that is 
fully compatable with 
Radio Shack's kit $4.95 

Listing without line num- 
bers for the final 
copy. $4.95 

No more line listings that 
run off the page *a qc 

Allows BASIC to save text 
as program files $4.95 

"WIZ" O yr roanua' on word proc- 
essing with BASIC $4.95 

These programs run on any Level II 
cassette or disk system and can be 
turned on or off from BASIC. 
They are distributed on cassette tape 
with instructions. 

SPECIAL OFFER 

ALL 4 programs plus the Manual for 
° n 'V $14.95 



Professional Data Corporation ^237 
100 Broadway 

North Haven. CT. 06473 VISA/ 

(203) 239-7671 MASTER CARD 



Subscribe to 



m 



microcomputing 



out the postage 
paid reply card on 
page 162 



For Business Systems Software 

Programmers Only!! 

Machine Language 

ISAM 

FOR 

TRS-80* Models I and II 
ACCESS TIME Vi SECOND!! 

This machine language ISAM ROUTINE pro\ ides file access 
sophistication required to implement complex business soft 
ware, and is completely compatible with TRS-80* BASIC. 

Specifications: based on 1000 record file. ke> length of 6. 

data length of 64 

Access time of i second 

Best add/delete lime ol I second 

Average add delete lime ol 2 seconds 

Worst case add-'delete lime of 5 seconds 

Keys up to 25 characters 

Data up lo 255 

Provides next highest key upon each file access 

up to 4 files held open concurrently 

No special utilities needed lo "Reclaim" used record space. 

Model I Routine occupies 5 K ol user space lloads at top ot 

user memory) 

Model II Routine occupies 6 K of user space (loads at topol 

user memory) 

EOF, file full, empiy. key nol lound. INVALID key value 

and all TRS DOS* error codes supported 

TRS-80 Model 1 (32 K + 48 K only) $160.00 
TRS-80 Model II (64 K only) $170.00 

Includes: All necessary documentation, file creation pro- 
gram, file inspection program, machine language ISAM 
routine and loader. 

RELIAB LE COMPUTER RESOURCES 
S - ! 415 MILLBURY STREET 
If* WORCESTER. MA 01607 
,sH\ .-, (617)755-0064 



•^ 197 



•TRS-Wand 1 RSDOS ure trademarks oj landv 
Corporal ion, which has no relulion lo RCR Inc.. 
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/^PROGRAM STORE 



(202) 337-4691 



4 200 Wisconsin AveNW PQBox9609 Washington DC 20016 



Save time & space! 



PACKER 



by Cottage Software 

This is the ultimate editing 
tool for BASIC program lines. There 
are five commands which allow 
easier reading of BASIC programs 
and more efficient execution by the 
computer. 

The 'unpack' command breaks 
multiple statement lines into 
sinqle statement lines with extra 
spaces for easier reading and 
editing. The 'short' command 
deletes any unnecessary words like 
LET and all REMarks. 

The 'pack' commmand compresses 
lines into multiple statement lines 



up to the maximum length you 
specify while maintaining complete 
program logic. This can easily 
reduce the memory requirement by 
more than 33*! As you can imagine 
this also speeds up execution of a 
program, saves time in loading a 
program from either tape or disk 
and saves disk space. 

And the 'move' command allows 
you to move any section of your 
program to a new location. With 
the 'renumb' command you can 
renumber your BASIC lines. 

So if your programs need more 
memory, or you need more time, 
order your 'packer'! 16k, 32k and 
4 8k versions supplied on two 
cassettes for $29.95. 



Morloc's Tower 

from Automated Simulations 
As Brian Hammer hand, you race to 
save the comely wench Imelda from 
the fireballs of Morloc the Mad. 
An exciting fantansy role playing 
game in the Dunjonquest tradition 
that started with "The Temple of 
Apshai" and continued with 
"Datestones of Ryu." This is the 
deadliest Dunjonquest yetl $14.95 
"Datestones of Ryn" $14.95 
"Temple of Apshai" $24.95 
Supplied on disk for an additional 
$5 per program. 

Dungeon 

from Chameleon 

A full fantasy & adventure where 
you create your character, choose 
from among 26 types of armor and 80 
weapons, and search for fame and 
fortune. In each dungeon there are 
random events which occur, but 
skill most often determines the 
outcome. The program has many 
prompts and the twenty page, 
illustrated manual explains the 
game. Requires 32k and two disk 
drives. $34.95 

Galactic Trader 

by Douglas Carlston 

Trade your way to a fortune in a 

three dimensional universe. You 

must barter, deal with the energy 

cartel and watch for spies. This 

is truly an outstanding computer 

game by the author of "Galactic 

Empire." $14.95 

Also available "Galactic Empire" 

for $14.95 



STRUCTURED 

BASIC 

TRANSLATOR 

by Gene Bellinger 

Try structured programming. You 
can write programs using 
PROCEDURES , CALLS , CASE-CALLS , 
IF-THEN-ELSE, WHILE and UNTIL. 
Once written, SBT will quickly 
translate the structured code into 
an effecient BASIC program. Speeds 
up program development and 
documentation. The program is both 
fast (a 20k BASIC program in less 
than 4 minutes) and compact. 
Requires 3 2k and one disk drive. 
Supplied on disk for $29.95. 




Air Flight 

from Instant*?oft* 



tware 

Transform your TRS-80 into a 
cockpit full of elaborate controls. 
Take off, land and do acrobatics 
once you learn how to fly. $7.95 



Air Raid 



from Small Systems 

Real-time, "shooting gallery" game 
which is better than the arcades. 
In machine language for excellent 
graphics and endless hours of fun. 
JA4-r»3" NOW only $9.95 

Space War 

by* Device Oriented Games from Acorn 
Two-player, real-time space battle 
lets each player control a 
spaceship with rotate, thrust, fire 
and hyperspace. Five game options 
(includinq gravity) and three 
speeds included. In machine 
lanquage. $9.95 

Calculator Plus 

from Manhattan Software, Inc. 
Turn your TRS-80 into a calculator. 
This program has optional printer 
features, performs all calculations 
in double precision and will chain 
and mix calculations. Optional 
dollar format. $9.95. 



KEYEDIT 



by Phil Pilgrim from Discovery Bay 

This machine language utility is for 
all users of either Level II or Disk 
QAEIC. The functions give you 
auto-repeat on every key, screen- 
oriented editing, and debounce. In the 
editing mode, you just move the cursor 
to any Dosition on the screen to 
instantly insert or delete. Plus, whole 
BASIC statements can be copied to other 
parts of the program. 

You also get single keystroke entry. 
For example, just press <SHIFT> R to 
enter the word READ. And you can 
redefine the keys to any BASIC keyword. 

In addition, the keyboard macro 
facility allows you to define any 
frequently typed pattern and then 
execute it with a single keystroke. 
This is especially great for DATA entry 
and other repetitive tasks. 

Order the greatest keyboard utility 
yet! $18.95 

DEBUG 

by Bob Pierce from Quality 

Single step your programs through RAM 
and ROM, with this relocatable machine 
language utility. Includes multiple 
breakpoints, option to execute CALLS in 
a single step and several display 
options. $14.95 

DISASSEMBLER 1.2 

by Roy Soltoff from Misosys £ Acorn 

This two pass Z-80 disassembler 
produces symbolic labels with output to 
either the video monitor, printer or 
tape. Radio Shack's Editor Assembler 
can load the tapes. If you own the 
Editor Assembler, complete the package 
with this program. Program on tape for 
two different memory locations. TRS-80 
Level II_ALft»*5— NOW only $14.95 



DDT 



Disk Drive Timer 
by Disco-Tech 

Analyze and adjust your disc drive motor 
speed with real-time graphic display. 
Manual details use for Radio Shack, 
Shugart, MPI, Pertec, and Vista drives, 
but will work with any drive. All you 
need is DDT, two screwdrivers and five 
minutes. On disk for $19.95 



Credit card callers may phone us 2 t HcuRs a day. 

OR CLIP THIS COUPON WD MAIL YOUR ORDER TODAY. 

^ar-iiDDaDancu^DuUuuDnnnnuQnDDcacDoaDaDDDD 

j . THE PROGRAM STORE 

i •^JT^N. *200 Wisconsin Ave NW 

j f/[\ \ PO Box 9609 Dept K .8 

j I / \\ Washington, D.C. 20016 

please send me these TRS-80 programs: 



c title 



price 




postage: $ 1 . 0*0" 
total : 



Biocurve H „ 

by MicroTlair from Hayden 
Graph your biorhythms and calculate: 
your critical days. Compare yours; 
with a friend. $9.95 ' 



address: 

city, state 

& code 

Check payable to The Program S 



MASTERCHARGE 

VISA 

card number: 

signature: 



mc bank code: 
exp date: 




THE ORIGINAL MAGAZINE FOR 
OWNERS OF THE TRS-80™* MICROCOMPUTER 



SOFTWARE 

FOR TRS-M" 

OWNERS 



CQMPUTRaNICS 

MONTHLY NEWSMAGAZINE 

Practical Support For Model I & II 



MONTHLY 

NEWSMAGAZINE 

FOR TRS-80" 

OWNERS 



PRACTICAL APPLICATIONS 
BUSINESS 

GAMBLING • GAMES 
EDUCATION 
PERSONAL FINANCE 
BEGINNERS CORNER 
NEW PRODUCTS 
SOFTWARE EXCHANGE 
MARKET PLACE 
QUESTIONS AND ANSWERS 
PROGRAM PRINTOUTS 
AND MORE 



PROGRAMS AND ARTICLES PUBLISHED IN OUR FIRST 12 ISSUES 
INCLUDE THE FOLLOWING: 

A COMPLETE INCOME TAX PROGRAM (LONG AND SHORT FORM) 

INVENTORY CONTROL 

STOCK MARKET ANALYSIS 

WORD PROCESSING PROGRAM (FOR DISK OR CASSETTE) 

LOWER CASE MODIFICATION FOR YOUR VIDEO MONITOR OR PRINTER 

PAYROLL (FEDERAL TAX WITHHOLDING PROGRAM) 

EXTEND 16 DIGIT ACCURACY TO TRS 80" FUNCTIONS (SUCH AS 

SQUARE ROOTS AND TRIGONOMETRIC FUNCTIONS) 

NEW DISK DRIVES FOR YOUR TRS-80" 

PRINTER OPTIONS AVAILABLE FOR YOUR TRS 80" 

A HORSE SFLFCTION SYSTEM***ARITHMETIC TEACHER 

COMPLETE MAILING LIST PROGRAMS (BOTH FOR DISK OR CASSETTE 

SEQUENTIAL AND RANDOM ACCESS) 

RANDOM SAMPLING***BAR GRAPH 

CHECKBOOK MAINTENANCE PROGRAM 

l.EVF.l II UPDATES***LEVEl II INDEX 

CREDIT CARD INFORMATION STORAGE FILE 

BEGINNER'S GUIDE TO MACHINE LANGUAGE AND ASSEMBLY 

LANGUAGE 

I INE RENUMBERING 

AND CASSETTE TIPS. PROGRAM HINTS. LATEST PRODUCTS 

COMING SOON iGENERAl LEDGER. ACCOUNTS PAYABLE AND 

RECEIVABLE FORTRAN 80. FINANCIAL APPLICATIONS PACKAGE. 

PROGRAMS FOR HOMEOWNERS. MERGE TWO PROGRAMS. 

STATISTIC Al AND MATHEMATICAL PRCXiRAMS (BOTH 



ELEMENTARY AND ADVANCED) 



AND 



f* 



S* 



WORD PROCESSING PROGRAM 

(Cassette or Disk) 

For writing letters, lent, mailing lists, fit . with eat h 
new subscriptions or renewal 

LEVEL II RAM TEST 
(Cassette or Disk) 

Checks random access memory to ensure that all memory 
locations are working properly 



DATA MANAGEMENT SYSTEM 
(Cassette or Disk) 

Complete tile management lor your IKS 80" 

CLEANUP 

(Cassette or Disk) 

Fast ai lion Maze Game 



TEM ^- 



TRS*>~ISA TRADfcMARK Of TANOY CORP 



SEND FOR OUR NEW 48 PAGE SOFTWARE CATALOG (INCLUDING LISTINGS OF HUNDREDS OF TRS 80" PROGRAMS AVAILABLE ON 
CASSETTE AND DISKETTE) $2 00 OR FREE WITH EACH SUBSCRIPTIONS OR SAMPLE ISSUE 



•CQIY1RJTRQNXCS- 



Box 149 New City. New York 10956 

ONE YEAR SUBSCRIPTION $24 

TWO YEAR SUBSCRIPTION $48 

SAMPLE OF LATEST ISSUE $4 

START MY SUBSCRIPTION WITH ISSUE 

(#1 - July 1978 • #7 - January 1979 • #12 - June 1979 • »18 - January 1980 




m 



HOUR 
24 ORDER 

LINE 
(914)425-1535 




NEW SUBSCRIPTION 



RENEWAL 



CREDIT CARD NUMBER 



EXP DATE. 



SIGNATURE- 



NAME 



ADDRESS 



STATE . 



_ZTP. 



— ADO M/YEAR (CANADA. MEXICO) - ADO SI I/YEAR AM MAS. - OUTSIDE OF USA. CANADA 8 MEXICO ' 
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CQiriPUTHQWICS 



c. 



• • • EVERYTHING FOR YOUR TRS-80 • • • 

TRS-ao Is ■ trademark of the Radio Shark Division of Tandy Corporation 

* All Orders processed within 24-Hours 

■k Free Shipping within U.P.S. areas (add $3 for orders outside of the U.S.A. or U.P.S. areas). 
■k 30-Day Money Back Guarantee on all Software (less a $3 penalty for handling). 

k 10-Day Money Back Guarantee on Disk Drives and Printers PLUS 1 20-Day s Free Service. 



LEARNING LEVEL II by David Lien 

The Original Author Of The Level Manual 
A Step By Step approach to Learning Level II 
especially geared to new TRS-80" Owners 
$15 95 



• TRS-M DISK AND OTHER MYSTERIES 

$19.95 ($22.95 after 2/1/80). Over 100 pages 
of indespensible information for disk owners 
Learn to recover information from bad disks, 
how to make Basic programs unh stable and 12 
more chapters of never published lips and infor- 
mation Written by H C Pennington (For all 
Disk Owners) 



NEW SBSG BUSINESS SYSTEM FOR 
MODEL I OR MODEL II - IN STOCK 

• General Ledger 

- Accounts Receivable 

- Accounts Payable 

- Payroll 

- Inventory Control With Invoicing 

• Each module can be operated individually 
or as a coordinated SYSTEM. Turn-Key error 
catching operation for beginners 

• Complete manual and documentation 
accompany each program 

• Minimum System requirements 2-Disk 
Drives for Model l...1-Disk Drive for Model II 

• Each module can be formatted to span data 
on Upto 4- Disk Drives 

• Free 30-Day telephone consultation 

• Call for complete specifications 

• Model I Version $125 per module 
$495 per System 

• Model II Version $225 per module 
$995 per System 



DATA MANAGEMENT SYSTEMS 

- DMS replace index cards or any data 
requiring long lists of information. 

• TBS In-Memory Information System 

(for cassette systems) $24.50 

• TBS Disk Data Manager (requires 1 or more 
disk drives). ..Set up fast random access 
files in minutes. Stores up to 320K of 
information on 4 Drives. Up to 10 fields 
and 255 characters per record. Supports 
upper and lower case RS-232 or TRS-232... 
Features complete editing $49.50 

• Personal Software CCA Data Management J 
System... Completely user oriented, menu 
drive, 130 page Step by Step Manual... 
capable of inventory control, sorting data, 
reporting data in nearly any form (for reports 
and mailing labels). Sorts data by up to 10 
fields for zip code, balance due. geographic 
location or whatever. Prints reports with 
subtotals and totals automatically calculated. 
Fast random access $75.00 



Box 149 Now City, N«w York 10956 



FROM RACET COMPUTES 

• REMODEL-PROLOAD - Renumbers pro- 
gram lines, combines programs The only re- 
number program that will renumber the middle 
Of a program Specify 16K. 32K or 48K Works 
with Cassette or Disk . . . $34.95 

• GSF - Use m your Basic Programs tor Instant 
Sorting (will son 1000 items in 9 seconds). Other 
commands include Compress and Uncompress 
Data. Duplicate Memory. Display Screen 
Controls and Fast Graphic Controls . . . $24.95 
(For Cassette or Disk, specify 16K. 32K or 48K) 

• DOSORT - Ail G S F commands plus special 
Multiple Disk Sorting Routines . . . $34.95 
(Specify 32K or 48K) 

• INFINITE BA8IC - Adds 70 commands to 
your TRS-80 including Instant Son. Matrix 
Commands. String Commands. Left and Right 
Justification, String Centering. Simultaneous 
Equations, Upper and Lower Case Reverse and 
more . . . $49.99 (For Cassette or Disk) 

• INFINITE BUSINESS (Requires Infinite Basic) - 
Eliminate Round-otf error. 127-Digit Calcula- 
tion Accuracy. Insert New Elements in Sorted 
Arrays. Automatic Page Headings. Footings, 
and Pagination. Multiple Precision Arithmetic 
and more . . . $29.99. (For Cassette or Disk) 

• COPSYS - Copy Machine Language 
Programs . . . $14.95 (For Cassette only) 



FROM SMALL SYSTEM SOFTWARE 

• RSM-2 Machine Language Monitor . . . $29.95 

• RSM-2D Disk Version of RSM-2 . . . $29.95 

• DCV-1 Converts Machine Language Programs 
from tape to disk . . . $9.95 

• AIR RAID - The ultimate TRS-80 game con- 
verts your TRS-80 into a real time shooting 
gallery . . . $14.95 

• BARRICADE - A fast pong style game . . $14.95 

• CPM - $150 (for Oisk only) 

• TRS-232 INTERFACE - Interface with Soft- 
ware driver RS-232 printers to your 

TRS-80 . . . $49.95 

• TRS-232 FORMATTER -Additional 
(optional) Software for TRS-232 owners Ads 
many printer commands to your 

TRS-80 . . . $14.95 ($9 95 with purchase of 
TRS-232) 



MAIL PAC - For Model I or Model II Disk 
Systems only . . . $99.95. Quick-sorting full user 
control over mailing list from Gallactic Software 



FROM AOVENTURELAMD INTERNATIONAL 
* ADVENTURE #1 - #• by Scott Adams 
$14.95 each available on Cassette or Disk 



SARGON II 

THE CHESS CHAMP 

$29.95 



FROM APPARAT 
NEW DOS ♦ $99.95 

35. 40 and 77 Track Versions available 



48-Page Catalog $2 FREE With Any Order 

Order by Phone or Mail 

No Shipping Charge 

Add $3 for COD. 

Add $3 for all Foreign and non-UPS shipments 

Add $3 for UPS Bkte Label 



FROM THE BOTTOM SHELF 

• CHECKBOOK II (for Cassette or Disk) . . 
$19.50 

• INFORMATION SYSTEM (for Cassette or 
Disk . . . $34.50 

• SYSTEM DOCTOR (a complete diagnosis of 
your TRS-80 checks memory, video, cassette, 
disk, ROM and all other parts of your system) - 
for Cassette or Disk . . . $29.50 

• CHECKBOOK REGISTER ACCOUNT- 
ING SYSTEM (requires 2 disk drives) . . $49.50 

• LIBRARY 100 - 100 established business, 
game and educational programs plus FREE Tiny 
Pilot all for . . . $49.50 

• BASIC TOOL KIT - lists all variables. GOTO's 
and GOSUB's in your program . . . $19.90 



• SOUNDWARE - Ads sound to your TRS-80 
Just plus it in . . .$29.95. Sample programs 
included 

• TING TONG - Can be used with Soundware 
for a Sound version of pong . . . $9.95. 



VIC- The Carta Visual Instructional $i9 95 
Computer Program 

The Level II 16K Cassette is designed to teach 
beginners the Basics of Machine Language and 
Assembly Language Programming See every 
Machine Language Instruction Display on 
your Video 
VIC includes a Step By Step 55 page manual 



VISTA VUO DISK DRIVE 

110 K OF STORAGE 

$395 

Add $29 95 tor Cable 

(Free with Purchase of Two Disk D rives) 

— 10 Day Money Back Guarantee - 



FROM HOWE SOFTWARE 

MON-3 - Machine Language Programming for 
Beginners MON-3 is a Complete 
System Monitor with Users 
Manual $39.96 
MON-4 • Disk Version of MON-3 . . . $49.95 



LEVEL III BASIC . . . $49.95 FROM 
MICROSOFT - Now Cassette owners can add 
Disk Commands to their TRS-80 without owning 
a Disk Drive 



•RAND NEW OLIVETTI PRINTER . . .$3495 

Business Letter quality print. Automatic Line 
Justification (on request). Quick Printing, can 
be used as a Memory Typewriter, plug* right 
into your TRS-80 without any modification or 
software 



THE ELECTRIC PENCIL 
Cassette . . . $99.95 

Dtek . . . $150.00 



HORSE SELECTOR II by Dr Hal Davis . . . 
ISO. The TRS-80 version updated for the TRS-00 
and originally reviewed in Systems and 

Methods 



*> 



24 

HOUR ORDER LINE 
(914) 425-1535 




s Reader Service — see page 162 



80 Microcomputing, May 1980 • 149 



CQMPUTRQNICS 



EVER 



FOR YOUR TRS-80 ... 



TRS-ao in a trademark of ihc Radio Shark Division of Tandy Corporation 




COORDINATED BUSINESS SYSTEMS 



SMALL BUSINESS 
SYSTEMS GROUP 



• EACH MODULE CAN BE OPERATED INDIVIDUALLY OR AS A COORDINATED SYSTEM 

• TURN-KEY ERROR CATCHING OPERATION FOR BEGINNERS 

• FREE 30-DAY TELEPHONE CONSULTATION WITH SBSG 

• EACH MODULE CAN BE FORMATTED TO SPAN DATA ON UPTO 4 DISK DRIVES 

• COMPLETE MANUAL AND DOCUMENTATION ACCOMPANY EACH MANUAL 

• MINIMUM SYSTEM REQUIREMENTS - 2 DISK DRIVES FOR MODEL I...1-DISK DRIVE FOR MODEL II 



ACCOUNTS PAYABLE 

The accounts payable system receives data concerning purchases from 
suppliers and produces checks in payment of outstanding invoices. In 
addition, it produces cash management reports. This system aids in tight 
financial control over all cash disbursements of the business. Several 
reports are available and supply information needed for the analysis of 
payments, expenses, purchases and cash requirements All A/P data feeds 
General Ledger so that data is entered into the system just once These 
programs were developed S years ago for the Wang micro-computer and 
have been tested in many environments since then The package has been 
converted to the TRS-80'" and is now a well documented, on-line, inter- 
active micro-computer system with the capabilities of (or exceeding many 
larger systems. 



CAPABILITIES 



ACCOUNTS RECEIVABLE 

The objective of a computerized A/R system is to prepare accurate and 
timeley monthly statements to credit customers Management can gener- 
ate information required to control the amount of credit extended and the 
collection of money owed in order to maximize profitable credit sales 
while minimizing losses from bad debts. The programs composing this 
system were developed 5 years ago, especially for small businesses using 
the Wang Microcomputer. They have been tested in many environments 
since then. Each module can be used stand alone or can feed General 
Ledger for a fully integrated system. 



PAYROLL 

Payroll invoices many complex calculations and the production of reports 
and documents, many of which are required by government agencies It is 
an ideal candidate for the computer. With this Payroll system in-house. 
you can promptly and accurately pay your employees and generate 
accruate documents/reports to management, employees, and appropriate 
government agencies concerning earnings, taxes, and other deductions. 
The package has been converted to the TRS-80™ and is now a well 
documented, on-line, interactive micro-computer system with the capa- 
bilities of (or exceeding) many larger systems. 

CAPABILITIES: 

* performs all necessary payroll tasks including: 

• file maintenance, pay data entry and verification 

• computation of pay and deduction amounts 

• printing of reports and checks 

* can handle salaried and hourly employees 

* employees can receive: 

• hourly or salary wage 

• vacation pay 

• holiday pay 

• piecework pay 

• overtime pay 

(Continued on next page) 



* menu driven; easy to use; full screen prompting and cursor control 

* invoice oriented; everything revolves around the invoice; handles new 
invoice or credit memo or debit memo 

* invoice information recorded; invoice #, description, buyer, check 
register #, invoice date, age date, amount of invoice, discount (in %). 
freight, tax ($), total payable 

* transaction print and file maintenance procedures insure accuracy 

* flexible check calculation procedure; allows checks to be calculated for a 
set of vendors - or - for specific vendors 

* program prints your checks; contiguous computer checks with your 
company letterhead can be purchased from SBSG 

* reports include (samples on back): 

• open item listing/closed item listing - both detail and summary 

• debit memo listing/credit memo listing 

• aging 

• check register report (to give an audit trail of checks printed) 

• vendor listing and vendor activity (activity of the whole year) 

* fully linked to GENERAL LEDGER; each invoice can be distributed to as 
many as five (5) different GL accounts; sysem automatically posts to cash 
and A/P accounts 



CAPABILITIES 



* menu driven; easy to use; full screen prompting and cursor control 

* invoice oriented; invoices can be entered before ready for billing, when 
ready for billing, after billing or after paid 

* allows entry of new invoice, credit memo, debit memo, or change/delete 
invoice 

* allows for progress payment 

* transaction information includes: 

• type of A/R transaction 

• customer P.O. # 

• description of P.O. 

• billing date 

• general ledger account number 

• invoice amount 

• shipping/transportation charges 

• tax charges 

• payment 

• progress payment information 

• transaction print and file maintenance procedures insure accuracy 

* customer statements printed; computer statements with your company 
letterhead can be purchased from SBSG 

* reports include; (samples on back) 

• listing of invoice* not yet billed 

• open items (unpaid invoices) 

• closed items (paid invoices) 

• aging 

* fully linked to General Ledger; will post to applicable accounts: debits A/R, 
credits account you specify 
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(PAYROLL CAPABILITIES CONTINUED) 

* employees can be paid using any combination of pay types (except, hourly 
cannot receive salary & salary cannot receive hourly) 

* special non-taxable or taxable lump sums can be paid regularly or one time 
(bonus, reimbursements, etc) 

* health & welfare deductions can be automatically calculated for each 
employee 

* earnings-to-date are accumulated and added to permanent records; taxes 
are computed and deducted US income tax. Social Security tax. state 
income tax. other deductions (regular or one time) 

* paychecks are printed; computer checks with your company letterhead 
can be purchased from SBSG 

* calculations are accumulated for; employee pay history, 941 A report, W-2 
report, insurance report, absentee report 

* fully linked to General Ledger. Each employee's payroll information can be 
distributed to as many as (12) twelve different GL accounts: system 
automatically posts to cash account 



INVENTORY/CONTROL INVOICING 

• OVER 1000 ITEMS ON MODEL I 

• OVER 3000 ITEMS ON MODEL II 

• LOW STOCK ALARM 

• INVOICING DEDUCTS FROM INVENTORY 

• COMPLETE INVENTORY REPORTS 

• REORDER POINT REPORT 

• QUICK ITEM ACCESS 



CLIENT BILLING. STOCK CONTROL, DENTAL BILLING. COMMODITIES 
Medicare/Medicaid billing also available 



MODEL I 
MODEL II 



$125 Per Module 
$495 Complete System 
$225 Per Module 
$995 Complete System 



WE ARE THE ONLY SOFTWARE COMPANY THAT OFFERS A REFUND 
WITHIN 30 DAYS ON ALL SOFTWARE (H & E COMPUTRONICS 
MONTHLY NEWSMAGAZINE SUBSCRIBERS ONLY) WE DO 
CHARGE A $3 PENALTY TO COVER POSTAGE AND HANDLING. 



GENERAL LEDGER 

The General Ledger accounting system consolidates financial data from 
other accounting subsystems (A/R, A/P, Payroll, direct posting) in an 
accurate and timely manner. Major reports include the Income Statement 
and Balance Sheet and a "special" report designed by management. The 
beauty of this General Ledger system is that it is completely user formatted. 
You "customize" the account numbers, descriptions, and report formats to 
suit your particular business requirements These programs were de- 
veloped 5 years ago for the Wang micro-computer and have been tested in 
many environments since then. The package has been converted to the 
TRS-80" and is now a well documented, on-line, interactive micro- 
computer system with the capabilities of (or exceeding) many larger 
systems. 



CAPABILITIES 

* more than 200 chart of accounts can be handled 

* account number structure is user defined and controlled 

* more than 1.750 transactions may be entered via: 

• direct posting; done by hand, validated against the account file 
before acceptance 

• external posting; generated by A/R. A/P. Payroll or any other user 
source 

* data is maintained and reported by 

• month 

• quarter 

• year 

• previous three quarters 

* reports (samples on back) include. 

• trial balances 

• income statement 

• balance sheet 

• special accounts reports and more 

* user formats reports with the following designed as you wish 

• titles 

• headings 

• account numbers 

• descriptions 

• subtotals 

• totals 

• skip lines 

• skip pages 

* up to eight levels of totals - fully user designated 

* menu driven, easy to use; full screen prompting and cursor control 



•CQMRITRQNXCS- 



BOX 149 



New City. New York 10956 




HOUR 
24 ORDER 

LINE 
(914) 425-1535 




PLEASE SEND ME: 

MODEL I $125 PER MODULE 



MODEL II 



$495 COMPLETE SYSTEM 
$225 PER MODULE 



$995 COMPLETE SYSTEM 
CREDIT CARD NUMBER 



.EXP. DATE- 



SIGNATURE 



NAME 



ADDRESS 



-STATE. 



J. IP- 



ADD S6/YEAR (CANAOA. MEXICO! - ADD $12'YEAR AIR MAIL OUTSIDE Of U S A . CANADA & MEXICO " - 



v Reader Service -see page 162 
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UTILITY 



LPRINT the screen by 
pressing I, J, K simultaneously. 



Screenprint 



Louise Frankenberg 
1289 M ago thy Road 
Pasadena MD 21122 



Here's a short (66 bytes) 
assembly language pro- 
gram for level II DOS or DISK 
BASIC that will send the con- 
tents of your screen to your 
printer at the push of a button! 
Well, three buttons: l,J,K pushed 
simultaneously. 

Use it to print directories, 
sample BASIC runs, or whatever 
is visible on the screen in the 
middle of a BASIC program. The 
program itself pauses while the 
screen is printed and then con- 
tinues where it left off. 

The program is compatible 
with any printer-driver. Its only 
printing limitations are 
machine-language programs 
such as DEBUG, since these in- 
hibit the usual keyboard-scan 
routine, and, of course, it can't 
reproduce graphics on a non- 
graphics printer! 

Program Notes 

Change the ORG in line 145 
according to the amount of RAM 
in your system. You'll probably 
want to keep it at the top of 
memory so it's out of the way; 
mine fits in 48K just below a 
printer-driver program. If you do 
move the ORG, you will also 
have to change the address in 
line 192 to an address just below 
it. 

Lines 192 and 194 are optional 
except tor TRSDOS 2.2 users. 
What they do is to fool the com- 
puter into thinking that your 



RAM ends just below SCRN- 
PRT's starting address. This 
means that you don't have to 
bother answering MEMORY 
SIZE? when entering BASIC if 
SCRNPRNT is the only (or low- 
est) machine-language program 
you plan to use; I've started mak- 
ing a habit of adding these two 
instructions to every program so 
that I don't have to remember 
different MEMORY SIZE'S. 

The lines are an absolute 
necessity if you use TRSDOS 2.2 
and want your program at the 
very top of memory, because for 
some unfathomable reason 



Radio Shack decided to use the 
top 64 bytes of any size RAM for 
housekeeping, and whatever re- 
sides there is wiped out when 
DISK BASIC is loaded! 

Lines 192-224, START to EN- 
TRY, initialize the program. First 
SCRNPRNT finds the printer- 
driver address at 4026H and 
adds it to the program, so it can 
be called later. The program 
then changes the keyboard 
driver pointer in 4016H to point 
to ENTRY so that whenever a 
key is pushed the computer 
comes to this program instead 
of to the regular keyboard driver. 





00100 


;SCRMPRNT' E 


Y LOUISE H. FRANKENBERG, 20 OCT 79 




• 0110 












I11Z0 


; SENDS 


ENTIRE 


CONTENTS OF SCREEN TO PRINTER MH£N KEYS 




00130 


til J. 


AND K 


ARE PUSMCO SIMULTANEOUSLY. 




O0140 










' Of 5 


00143 




ORG 


• F0F5H 


iHEHORY SIZE 65013 


• 3E3 


OOl'.O 


KETSCN 


FOU 


03E3H 


iKEYBOARO SCAN DRIVER 


380? 


00160 


KEYS 


iOU 


3807H 


iKEYBOARO HEN. FOR I.J.K 


MIA 


00170 


KYPHTR 


f ou 


1016H 


1KETBR0 DRIVER AODR . PNTR 


4126 


00180 

00190 
0OI92 


PRPNTR 


[Oil 


4026H 


JPRNTER DRIVER ADDR . PNTR 


FDFS 21F0FD 


START 


LO 


HL.OFDFOH 


iADR. JUST BEL OH ORG 


FDFB 2201 OF 


00194 




LO 


(4049) .HL 


i CHANCE TOP OF RAM' 


FDFB 2A2640 


00200 




LO 


HI . (PRPNTR) 


JF-RIWTER DRIVER ADDR. 


FOFE 2222FE 


10210 




LO 


(PRL1 ItHL 




FEtl 222AFE 


• 0220 




LO 


(PR2.1 l.HL 




FE»4 2KDFE 


00221 




LO 


HI. ENTRY 


; CHANCE KEY6RO DRIVR PNTR 


FEI7 221640 


• 0222 




L0 


(KYPNTR).HL 


i TO ENTRY OF THIS PROC 


FE»A C32040 


• 0224 




JF 


40 2DH 


;jflp TO DOS 11A19 LEV. II) 


FEOO 3A0238 


00230 


ENTRY 


LO 


A. (KEYS) 


iCET KEY PUSH 


FE10 FEOE 


00240 




a 


•EH 


iSEE IF UK 


FE12 C2E30J 


00230 




jp 


HZ. KEYSCN 


iCO TO kOH DRIVER IF NOT 




00260 


iPRINt 


WHOLE 


SCREEN 




FE1S F5 


0076? 




PUSH 


AF 


;SAVE REGISTERS 


FE14 C3 


264 




PUSH 


l:{ 




FE17 03 


00266 




PUSH 


oc 




FE16 EI 


00268 




PUSH 


ML 




FE19 21003C 


00270 




LO 


HL . 3C OH 


i START OF SCREEN MEMORY 


FE1C 1610 


00280 




LD 


D.16 


; NUMBER OF LINES 


FE1E 0440 


00290 


NXTLIN 


LO 


P.. 64 


iLENCTH OF LIME 


FE20 4E 


00300 


MX T CNR 


LO 


C.(HL) 


JCET CHAR. TO BE PRINTED 


FF21 CO0000 


• •310 


PR1 


CALL 


»-• 


i PRINT IT 


FEZ4 23 


00320 




:■■'- 


HL 


;NEXT SCREEN ADDR. 


FE25 1IF» 


00330 




DJNZ 


NX T CHR 


iOO UMTIL MHOLE LINE DONE 


FE27 iEOO 


00340 




LD 


C.0OH 


i CARRIAGE RETURN 


FE29 CD0O0O 


00350 


FD2 


CALL 


t t 


iDO CARRIAGE RETURN 


FE2C 13 


00360 




DEC 


D 




FE20 C21EFE 


00370 




JP 


N7. NXTLIN 


iGO START NEXT LINE 


FE30 El 


00372 




POP 


HI 


iRESTORE RECISTERS 


FF31 01 


00374 




POP 


Dl 




FES? CI 


00376 




POP 


BC 




FE33 Fl 


00378 




POP 


AF 




FE34 C3E303 


380 




Jf 


KEYSCN 


iALl DONE- RETURN 


F0F5 


00390 




END 


START 




80000 TOTAL 


ERRORS 










INTRY FE0D 


• •230 


• •221 








KEYS 3802 


(1160 


• •23t 








KEYSCN »3E3 


• •130 


00250 00380 






XYPNTR 4016 


• 0170 


• S222 








NXTCHR FE20 


00300 


00330 








NXTLIN FE1F 


00290 


00370 








PR1 FE21 


00310 


• 0210 








IK.' Ft.'? 


0(330 


• 0220 








PRPNTR 4026 


001HO 


00200 








START FDF5 


00192 


00390 










Program Listing: SCRNPRINT 



The last statement in the sec- 
tion is a jump back to DOS 
READY or BASIC READY. Leave 
it as it is for DOS, but if you don't 
have a disk, change it to 1 A19H. 

Whenever a key is pushed, 
SCRNPRNT checks to see if I, J, 
and K have been pushed simul- 
taneously. If not, control is im- 
mediately returned to the reg- 
ular ROM keyboard-scan rou- 
tine. If so, the whole screen is 
printed out with a simple nested 
loop: HL is set to the upper-left- 
corner of the screen, and one 
character at a time is put in C 
and sent to the printer. A 
carriage-return is sent after 
each screen line. 

If your printer also requires a 
line-feed, make the following 

changes: Add a 'LD (PR3 + 1), 
HL statement to the initializa- 
tion section and add the follow- 
ing two statements after PR2: 
'LD C.OAH' and 'PR3 CALL $-$'. 
When the entire screen has 
been printed, line 380 causes a 
jump back to the ROM key- 
board-scan routine. 

Using SCRNPRNT 

Printing from the screen is 
easy! If you're using a printer- 
driver program, be sure to ini- 
tialize it first, so that 
SCRNPRNT will find the correct 
address. If you don't have a disk, 
load the program as a SYSTEM 
tape and press 7'. You will be 
returned to BASIC READY. With 
a disk, run the program under 
DOS right after power-up or after 
your printer-driver has been ini- 
tialized. Then, whenever you 
want a printout of what's on the 
screen, just press UK simulta- 
neously and you've got it! ■ 
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MANAGEMENT SCIENCE 
OPERATIONS RESEARCH 



IRS-80™ MATHEMATICAL 
PROGRAMMING SYSTEM. 

A collection o' programs which implement 
the simplex and dual simplex algorithms, 
the transportation algorithm and the 
branch-arid bound algorithm (Comes with 
documentation | . $18.00 

TRS-80™ DECISION SYSTEM. 

A collection o' programs which implement 
break-even analysis decision analysis, lot- 
tery analysis and game theory Useful to 
anyone laced with making decisions 
fComes with documentation) S18.00 

TRS-80™ SIMULATION SYSTEM. 

A program which facilitates the simulation 
of continuous dynamic systems described 
by differential or difference equations Pro- 
vides for integration printing and plotting 
o' the output on video or printer (Comes 
with documentation.) $25.00 



-QOFTWARE 
0/5NGINEERING 
"SYSTEMS 

INC. ^238 



QfQNC 



;a; : 3214 75ft Strtet 
lubbock. fens 79423 1806) 792-9110 

"Consultants m Sottwait '' 
«*Mf $¥&t0*ns Engineering ■ 



3£ 



9 



.95 

SOFTWARE 

P.O. BOX 521 Lowell. MA 01853 



7 • Memory based printer spooler, 
overlap processing and I/O. 

2 • IBM based terminal driver, 

EBCD and correspondence 
code. Full ASCII character set 
with overstnkes Scripsit 
ZAPS 

3 • Disk timing program 

Meter Type numerical and 
statistical screen displays. 
Very easy calibration of all 
type drives 

4 • Cassette test programs 

Writes test data to tape, then 
displays all errors on screen 
Use to check all facets of 
cassette operation and dupli- 
cation quality 

SEND FOR FREE FLYER 



— The bottom line — 

COST: $9.95 Each + .75 postage 
MA Orders + 5% tax ^235 



FINALLY! 

PROFESSIONAL 

PROGRAMMING 

TOOLS FOR EVERY 

BASIC PROGRAMMER 

Do vim write Basic pro-ams with youi TRS- 
80?' riu-ii you knov\ there .ire times when 
you need lo 

• RENUMBER part or all of vour program 

• DELETE m<in\ lines with one < ommand 

• APPEND common routines from tape 

Now, with PROgrammer, you can do all 
these things! \n<\ COMPRESS vour pro- 
grams to speed execution and reduce size 
-\nd MOVE blocks of lines within your pro- 
gram quickly and efficiently. Moreover, load 
PROgrammer jusl once, and these com- 
mani/v are .ilw.iw available! 



PRO K r.tfnm.i US on ,. 

h • 1 n I I'I.-.im- 

( .,1,1 f, „!.-,|. . . 

Ian.lv (ncu. 



■:■!!• uiNlriM Imrr 

mi'innn 

•[«•>-*> iv ,, .,.„!,.„,.,, V 1 



Rational Software 

963 r California Pasadena, CA 9TI06 

■^241 





Diskette 
SALE 

WE WILL NOT BE 
UNDERSOLD!!! 

Find the best price you can in this 
magazine on a box of 10, 5V*" Ver- 
batim diskettes and subtract 50c. Our 
regular price is $26.50. 



MAY SPECIAL 



If you purchase "TRS-80 Disk & Other 
Mysteries" lor the regular price of $22.50, 
you can buy l() Verbatim diskettes and a 
plastic library case for $22.50. 



THAT'S OUR PRICE 

Bijla 

.■Silii-iF/s 

4636 Park Granada 159 
Calabasas California 

91302 w [2131992 1970 




Send or call lor free catalog 
All orders shipped tree via 
UPS Same day 
Otter good as long as supply lasts 




Whai microcomputing maganne ha* the moil page* ol articles (vary month? Right 
Kilobaud MICROCOMPUTING I! you if interested in learning more about computer, 
and whal it going on with ihe Apple. Pt I, and all the other popular systems, you 
should have KM. Remember that youi monthly magazines are your besi computer 
library Subscribe now 



New subscription 
Payment enclosed S 
_, VISA ( MC 

Card » 


□ Renewal 1 2 issues (or S 1 8 

24 issues for S30 

H AE PI Bill me 36 issues for S45 


Interbank n 


Exp date 


Signature 


Name 


Address 


City State Zip 

— lor even faster ordering service call toll tree (800) 258 5473 

Canaa* same as US. m US tunas J 
s^_ Other foreign 123 one year only. US tunas J05B8 J 


MICROCOMPUTING • POB 997 • Farminfldale MY 1 1 737 



■Reader Service — see page 162 



80 Microcomputing, May 1980 • 153 



MANAGEMENT SYSTEMS SOFTWARE 

ANNOUNCES 
TWO NEW BUSINESS PROGRAMS FOR THE SMALL BUSINESSMAN 

BV 

IEROME S. OSTERYOUNG. PH.D. 

RENOWNED BUSINESS EDUCATOR AND AUTHOR OF 5 BUSINESS TEXTS 

PROFORMA CASHFLOW PROGRAM * LEASE-PURCHASE PROGRAM 

FORECASTS CASH NEEDS AND LIQUIDITY EVALUATES LEASE VS PURCHASE DECISION 

FOR UP TO 12 PERIODS INCORPORATES LATEST TAX IMPLICATIONS 

$125.00 EXTENSIVE DOCUMENTATION WITH EACH PROGRAM $100.00 

CASSETTE OR DISK 

WRITE FOR BROCHURE 

MANAGEMENT SYSTEMS SOFTWARE 

5200 BRITTANY DRIVE. #100$ ST PETERSBURG FL 33715 
(813)864-4347 ^87 



CHEAP BOOKKEEPER 



A GENERAL LEDGER SYSTEM 



See to Believe 

Sold by Sturdivanl and Dunn, Inc. for Radio Shack TRS-80* 
Model I Level II 32 or 48 K systems with 2 drives and at least 

an 80 character per line printer. 

Send $1.00 for information and sample printouts (14 pages) 

to Sturdivanl and Dunn, Inc., Box 277, Conway, NH 03818. 

^82 Price is $175.00. 

I KS-80 is a Trademark of Radio Shack, a Division or Tandy corporation. 



SURVEYING 
& CIVIL 
ENGINEERING 

MiCROCOMpLTER 

SOFTWARE 



rOH iMf 

RADiO Smack TSR 80" 

\7 I RAVI I'M (<l "»MI I W> 

I'wullll (.MM ll 

Q ( iilimllMII (.IOMIIUV 

0( IKIlllul IUII 
( ,1 llMI I H\ 

It win I SiaIuoi i 

^^ ( I IN I I \U ( I HVI 

Si \ki iii i 

Developed and tupportnl 

By a Regisie'ed Civi 
Eigineer Tested m 
Engineering P'aci>ce 
for cve> 2 years 

COMPLETE INSTRUCTION 
MANUAL INCLUDED 



Only s 260 



ANfl»rW MACHtN 




fur Inlofinaliriii Call 

714 755 4033 



QUALITY TRS-80 SOFTWARE 



KEYWORD Indexing System 

\ series i>l pmframs dial will creak a data flk iki date, rmlkl an 

Index «rf all iKimiko <i( "Key»mcoV In the k«l irf the data Hfc 

and »lk.» lm|«lrk> •" warvhes Into the ilk >-4mJ Ilk: Indexed 

kcy*i»rd». The sy\Km feawre«. 

•flexible record length* »l!h loealhNi pointers 

•dekthMi id mm kprnnk tnm Index in *r**f"i 

• "and" "or" "mm" hnjk hir kH flrt o 
•lakrtace tor Mr orMcn Inwilrto 

MiVMHIKIHMHA 2dKe)2kDOS>.v«km $39.95 

SORTS for HOME and BUSINESS 

V tiMiavkr Mr shiwld be «HmmI a ><r*iilk ( ca>> hi aw Mat 

pnifram. The Vmht** Iknwin In immin mmi ar o ay a r m are 

•rthea In Lml II BASIC and haw the kdkrolnj. fcaiaro. 

•Sort M.HH x or M "IrkX data 

•Ski imi up h> 5 fkkn vlm»lljnei>«>sj) 

•In axemflnj in- doeendbif «t*Knee 

•Suppurs kb. shJco « tape I fl 

•Sappcirt. Ka, dfc*. and prlnkr I (SORT 111)) 

• Sapporh Ml I (I rt>allne> 

• Lser oik. <SORT 110 .«k>) 

SORTII— lfcKLoellllnmenxir.x-1 $19.95 

SORT 110— J2K DOS In Memory -wi $29.95 

FOI the SCMOUS GAMILU 
BLACKJACK SIMULATOR. Allow, m hi simulak ihc plarlna; id 
fewsawh id hand* <d HJ and anah-#c the mah> im tape hi Level 
II BASK. $19.95 

Matwih fay id pnifninis joillibk for $ 1.00 aj, 
(prkc deductible in parchax id pmgrain) 

"TRSaO I* a ragistaxwj trademark ol TANDY CORP." 

l c IWrtheastJMICROWAR£l 
BOX 2133, <« 
BOSTON, MA. 02106 



TRS-80 







•8 Ourl'rKP 


• Level ll-le* 


84H 00 74<* tXI 


• Expansion Interface 


29S 00 IbAOO 


• Centronics Printers 




719 00 & Up 


• Verbatim Diskettes 


ot 


120 Pd 
Q (XI box ol 10 


• Prrt.ec Disk Drives 




»8«l 110 


• TKS-40 Disk Drives 




4-t'l IKI 



Business Software by 

• Robitron 

• Data Access Corp 

• Newdos + by Apparat 

Specialist in complete 
business computer systems. 

uGarner'sz 

Computer Center ^g* 
675 East Avenue 
Cedartown GA 30125 "** 
404-748-3614 or 748-8585 

tO is i farMma-rti o* it* Radio Sh*c* Dtvwon of Tancry Ccporaiion 



Let Your TRS-80® 

Teach You 

ASSEMBLY LANGUAGE 

Tired ot buying book alter book on assembly 
language programming and still not knowing your 
POP trom youi PUSH? 

REzIvisoft proudly announces a more effi- 
cient way. using your own TRS-80 1 . to learn the 
fundamentals o' assembly language programming 
-at YOUR pace and at YOUR convenience 
Our unique package. INTRODUCTION TO TRS-80* 
ASSEMBLY PROGRAMMING will provide you with 
the following 

• Ten 45-mmule lessons on audio cassettes 

• A driver program to make your TRS-80 1 video 
monitor serve as a blackboard tor the instructor 

• A display program tor each lesson 10 provide 
illustration and reinforcement lor what you are 
hearing 

• A textbook on TRS-80* Assembly Language 
Programming 

• Step- by step dissection ol complete and useful 
routines to test memory and to gam direct control 
over the keyboard, video monitor and printer 

• How to access and use powerful 'Outines m your 
Level M ROM 

This course was developed and recorded by 
Joseph E Willis and is based on the successful 
series ot courses he has taught al Meta Technologies 
Corporation, the Radio Shack Computer Center, and 
other locations in Northern Ohio The minimum 
system required is a Level II 16K RAM 

REMASSEM-1 only $69.95 



REMsoft, Inc. 

571 E. 185 st. 
Euclid, Ohio 44119 

(216)531-1338 



include $1 bO lor shipping dnd handling *^ 

Ohio residents add 5'/?% sales ia> 

TRS 80 1 is a iiademark ol the Tandy Corp 
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HOBBYWORLD 
ELECTRONICS 

America's Largest Mail-Order Computer Store 



CALL TOLL FREE: 
(800) 423-5387 USA 

IN CALIF: 
(800) 382*3651 

LOCAL & OUTSIDE USA 

(213) 886-9200 



BBB 



Electronics 
Books trom 



CEnicHnaj 



INTRODUCTION TO 
TRS-SO GRAPHICS 

Provides complete mlro lo basics ot 

i;rj|ilii(' programming ljmul; rcil 

etamples which run on 1RS-B0 
Book begins with basic concepts of 
line drawing and leads to geometric 
shapes, figure animation, and more 
advanced topics No math required, 
but familiarity with BASIC assum- 
ed. A TftS-JM) lor running rumples 
helpful, but movt concepts appK to 
at) low i ml computers with graphic * 
capabilities 

(ITS p*«**i 

I No. d-918 ciivii^ 



$8.95 



MICROSOFT BASIC 

Complete introduction on program- 
ming in Basic Illustrates concepts 
with etamples that run using MlfS 
family of BASIC interpreters. Com- 
mands are valid al each succeeding 
level of BASK. Can save valuable 
programming time and effort. Book 
assumes no prior programming ex- 
perience, but bask understanding 
of computer fundamentals 
be useful (Jit pages) 
I No. 441 B 198-2 3-1 



$9.95 



HOW TO OCT 
STARTED WITH 
CP/M $7.95 

Having trouble understanding 
CP/M? Book will get you into essen- 
tials in a tew easy steps. Most 
popular operating system explained 
in simple terms, glossary, list of 
hardware manufacturers supporting 
CP/M and list ot CPiM Software 
Cat No 4918198-32-0 (200 pages) 



REAL TIME BASIC 
FOR TRS-SO 

Will teach you how lo read and 
understand programs in BASK 
Book introduces control concepts 
using keyboard and screen, team 
how to interface TRS-BO to other 
devices and wire some specific cir- 
cuits. (1 SO pages) 

No (I 'Mhl'ift-IH i 



$6.95 



PASCAL WITH STYLE 

A guide written tor PASCAl users 
to help write more accurate, error- 
free programs, guideline* that stress 
program organization and "logical 
thinking' detailed set of standards 
Samples of PASC At program* are 
among the most readable seen 
anywhere Special chapter shows 
how to use lop-down approach with 

""fKJ-wi $6.95 



TELEPHONE 
ACCESSORIES 
YOU CAN BUILD 

May prove to be one ot the most 
popular books in technical library 
Remote ringing . group listening, 
speaking, speech scrambler, dialing 
9 of police and fire departments 
burglar alarm phone silencer 
these are some useful phone ac- 
cessories you can build for a Irac 
Hon of commercial cost lully iU 
luslrated: step-by-step instructions. 
Into on phone regulations and bask 
theory 
at No HS 



$5.95 



The nation's most popular com- 
puterized toys and games are now 
available direct from Hobby- 
World" Electronics. Name Brand 
Products include: Atari Home 
Video Came Center, T.I. Speak and 
Spell, Hand Held Baseball, Football, 
Fidelity's "Chess Challenger" and 
many others. 

FULLER ELECTRONICS RF-2 

TRS-80 DUAL CASSETTE 
CONTROL CENTER 



SEND FOR FREE FLYER 
FEATURING: 

Our new line of Computerized Toys 
and Games, Computers and Ac- 
cessories, Disk Drives, Printers, In- 
tegrated Circuits, LED's Semi Con- 
ductors, Connectors plus more and 
more. Select from Hundreds of 
Items at Terrific Prices! Circle our 
Reader Service Number or Phone/ 
Write for your Free Illustrated Flyer 
Today! 



$74.95 



\ids and amplifies cassette loading! 

■\ll<ms you to listen to cassettes as they are loading' 



Ring . 



plugging *™f unplug- 
ette cables! Saves wear 
and leal cm your ninipulcr 
system, adds the lleobilitv that 
you need tot level II data 
storage' Internal speaker allows 
you to listen lo CSAVI and 
C IOAO. also allow you to Inten 
to fast forward and rewind 
( IR 41 Independent solume 
control let* you adjust monitor 



let you linoyv status of one or 
both recorders. Now you can 
simultaneously CSAVI with both 
recorders: CLOAD with either 
recorder; cross tape with both 
recorders. Tested and resiewed 
in March 79 Creative Com- 
puting. Compact, only 4" i 11*" 
s 2 ' • " high C ompletely assem- 
bled and tested Wt 1t> of. 



loading 



ithoul 



,iii. 



Builli 



110. 



FULLER ELECTRONICS RF-3 

TRS-80 I/O & AUXILIARY 
CONTROL CENTER 

• Controls lights, video recorders, appliances thru your JRS-80' 

• With complete application software and documentation 

• Built-in relay protects your TR$S0 relay' 

• Controls from fractions of a second to months' 



The rm.si .ersatile IftWW ac- 
cessory available today? Otters 
lealures found onl* in units 
costing much more. Now you 
can control lighu when you're 
nol home at random times' Turn 
video recording equipment on 
and oft at preset limes, even 
months in advance Internal 
beeper can be used to signal the 
end ol a long sort. It also lets you 
know with one beep, two beeps, 
etc. esactly what part nl the pro- 
tram you're in! Also allows you 



TRS-80 EDGE 

CONNECTOR & 
CABLE 

• 40 pin (2x20) 

• 36' ot ribbon cable attached 

Standard connector and cable set 
plugs into rear ot main unit or ei- 
panskyn interface. Factory pre- 

at no. 2017 §8.8800 
' " "2for $16.00 



to check your RS-212 output 
without turning on the printer 
Built-in internal relay protects 
and bypasses control current 
from your sensitive IRS Kl) relay. 
Now you can even operate b or 
more cassette recorders safely 
for CSAVI. NOTE: 110VAC 
CONTROl II R IS NOT INCMJD- 
ID. A simple schematic and 
parts list is supplied. Si/e: 2" > 4" 
> IVj". 

$39.95 Cat No n 'lV2 

TV 
MODULATOR 

(kit) AsW 



.'.• 



Mm 



nlpul 



slan 



Accepts composite 
from computers. TV games, 
quires bVOC. operates Ofl at 
daid B4W IV . channel 2 or 1 < om- 
pletely shielded Nol to br used 
where prohibited by law Wt 4 or 
Cat No 1975 



$4 3forS10 



TRS-80 EDGE CONNECTOR 

• 40 Contacts 12x20) • 7 " Spacing 

unit 

Weight 



Cat No 

ISM 

214- 

214" 

214" 



toi etparmon i 
Description 
TRS-80 Edge Connector 
40 Cond. Cable 3 ft. length 
40 Cond. Cable 10 ft length 
40 Cond Cable 25 ft. length 



12 . 



Price 
$4.75 
$6.00 
Slfc.00 
S10 00 



INTRO TO 8080 & Z-80 

ASSEMBLY LANGUAGE PROGRAMMING 

An introductmy look at assembly techniques are presented along 

language programming far 8080V with instruc lions Diagrams and ev 

Z-80 processors- Intended to pro- ample* provided. Eiercises, with 

vide about everything the program- answerv included with each 

mer needs to get the most out ot htv chapter aw a*|g 

or her machine Programming Cat No HSItT y /.YD 






^TRS-BO 


$19 1 


LOWERCASE ] 


MODIFICATION KIT | 


Modifies yo 


ur machine to 1 


display both 


upper and lower 1 


| case Installs h 


i minutes, requires 1 


drill, solde 


ring .ron and 


screwdriver 


With complete 1 


1 instructions 


Cat No 1550 1 



[5/4" DUAL AND SINGLE 

DISK DRIVE 
I ENCLOSURES 

as tow as $25 

1 fits most standard disk drives. 
Shugart. MP/, Pertec and more' 

}u.il drive enclosure constructed of 
hi-impact plastic, one piece molded 
construction, charcoal-grey finish. 
Single drive enclosure constructed 
of rugged beige-finish steel, two 
piece construction 
Cat No. Description Wt Price 

| 2055 Dual Enclosure 2 !(>-> S»" 
I 224'. Single Enclosure 1 lbs*25 



TRS-80/APPLE/EXIDY 

16K Memory 
Add-on Kit 

Everything needed to up-grade your 
TRS80 Eh An additional Ifc* in- 
cludes illustrated instructions. 
RAMS and preprogrammed 
lumpers No special tools required 

"• 4 °' $88.00 

CAT NO DESCRIPTION 

11S4 TRS-80 keyboard llnil 

IISfe-A TRSISO lyp Interface 

Prior to 421/7* 
1IS*»8 TRS40 tip Inteilaie 

After 4/1PS 



LEEDEX 

Video 10080 

The model 80 features an in- 
dustrial grade metal cabinet \*ilh 
built-in Hivi mounting capability 
and space for an 11 .14' PC board 
lor custom designed electronics. 

Ihe solid state circuitry assures a 
sharp, stable, and trouble-Ire* pic- 
ture- The Iront panel controls in- 
clude power, contrast, horizontal 
hold, vertical hold, and brightnevs. 
Adfjuvtmentv for si/e. video level. 
and width are located on the rear 



Rugged metal 
space 

. -»V4 



t.net with disk 

$199 



WT ICHT 


PR 1(1 


IS lbs. 


si moo 


10 o< 


SSStybsilO: 



SHUGART SA-4O0 

5'/4" MINIFLOPPY DISK DRIVE 

Industry standard in disk drives! motor actuator and design which 
Hard and soft sectoring, IS track. assures read/write accuracy. Power 
single density, 35 msec accessing, requirements: I 12VDC al 1 S 
compact- only 5.75" > 12V i 8" amps; • 5VDC al 5 amps less 
deep, features direct drive stepping cabinet. Wt. 4 R». With manual 
Cat. No. 1154 SA400vs/manual S2B5 
Cat. No. I1S4D Manual only *2 SO 

MICRO SQUARED M'-250 

DOUBLE SIDED DISK DRIVES 

Two "Double SuJerf dnves yield Complete with Power Supply and 

1S8K Bvtes on IRswi 87SK Bytes Cabinet factory Tested tifelspec 

on S-100 systems, fast transfer rate tancv 20,000 hours, average media 

of 250* Bytes/Sec. No modification life J million passes on a vingle- 

of hardware or software necessary track. Pertec Drives 

CAT NO DISCBIPTION 

2054 M2-250 Disk Drives 

2)29 *S50-1fc Hard Sector Diskettes 

VERBATIM 5'/4" DISKETTES 

as low as $33.00 box of lO 

5 boxes for as low as S150 

525 SERIES 

• Double density ' 

• Single Sided 1 

• Perfect for commercial and general applications ' 

Cat No. Type Description Use for Price 

1147 5254)1 Soft Sector IRS4W $>).0O 

1148 S2>10 10 hole, hard North Star. Apple SHOO 
1144 $2V1r> It hole, hard Micropolis Slum 

550 SERIES 

• Quad density' Idouble sided, double density! 

• for commercial and general aptilicalions' 
Cat No. type Description Use for Price 
14« S504J1 Soft Sector SA4SO.MP1S2, SS^/rS 
2J28 SSO-10 10 hole hard BASE, Wangcn, *S*»5 
2.IM SS0-1* Ifc hole hard Micro-2 i ',•>'> . 

577 SERIES 

• Certified twite' 

• Single sided, double demity' 

• For critical data and applications' 

• Built-in hub protector ring' 

• Certified 7~" tracks' 

Cat No. Type Description Use for Price 

2J30 577-01 Sott sector TRS-80. etc S4") 9S 

2111 "-hi 10 hole hard North Star, Apple WtS 

2332 "- ii. 16 hole bard Micropolis. etc M* 95 



HOW TO ORDER 

iv by check, Mattercliarge. 
Viva, or COD. Charge orders 
please include eipiration date 
Foreign pay in U.S. funds. Order 
bv phone or mail, or at our retail 
MINIMUM ORDfR Sin please 
include phone number and mag- 
a/inefnsue you are ordering 
from Prices valid Ihru last day of 
cover dale SHIPPING: USA: 
add 42 00 for the first 2 lbs- r or 



ground add iS< for addrl lb. For 
air add 7$< lor addfl lb FOR- 
EIGN: surface: add $1.00 for first 
2 lbs. MX per addrl lb Air: add 
$11 00 lor first 2 lbs. S . for each 
addrl lb CODs $1 addrl Guar 
anteed salislaclion lor 120 days 
or your money back* Nol re- 
sponsible lor typographical 
errors Some items suh|ect to 
prior sale Wt reserve the right 
to limit quantities 



19511 Business Center Dr Dept. V5 Northridge, Ca. 91324 



^Reader Service - see page 162 
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. - . We have them ALL 

All the Disks and Printers 
that interface to the TRS-80 

5 1 /4" Drives — 8" Drives — Single and Double Density — 
and Hard Disk Systems with up to 40 megabytes! 



TRS-80 
Disk Drive 

SAVE 
OVER $100 

Vista, Percom, Lobo, 
and others 

Fully compatible with 

expansion interface 

and TRSDOS Software 

Some as Low as 

$359 



CP.'M' OPERATING SYSTEM 

for Mod. I List $145 $129 

for Mod II List $170 $149 

Complete line o( CPrW> Software available 
at discount pncaa. 



CENTRONICS 
PRINTERS 



NEW 730 

wrfncton 
and tractor 




$779 



CORVUS 10 megabyte hard 
disk for Mod. I or II 

ONLY $4795 



779-1 ITRS-80 Line Pnr 1). Lift $1245 949' 

779-2 witn tractor. Ln $1360 1049* 

702-2 120 cos bidirectional. 

tractor. VF J 1995 

703 2 185 cps. bi-directional. 

tractor. VFU 2396 

(snipped freight collect) 



ANADEX 

80-COL. DOT MATRIX PRINTER 



CONVERT YOUR EXISTING 

8ELECTRIC TYPEWRITER 

TO A PRINTER... 

Power Supply & electronics, assembled & 
tested. You make only a simple solenoid 
installation (or have the factory do It). 
Manufactured by Escon 

Parallel version, List »675 . ONLY 1614 

TPS-80 cable (specrfy MOO I or MOD I) 525 




Complete upper and lower case ASCII cnar. 
set. bi-directional at 84 iir»es/min. Features 
RS232 20/60 mil current loop and Centronix 
parallel Interface Ideal lor use wit* TRS-80. 
Sorcerer. Cromamco. and North*Star systems. 

OUR PRICE ONLY $749 

(shippings 10) 




Bi<l<rectionai, 150 cps. logic seeking; adjust 
eole trecior Available with lower case com- 
pressed print, forms length control or vertical 
forms control option. Centronics style parallel 
interface also available 

T.I. 810 with seriai'paraJlel interface 

List 1940 OUR PRICE $1735 

T| 810 printer outperforms Line Printer III. 



PAPER TIGER 




Paper Tiger. List $995 ONLY $895 

wfgraphics options, inci. bu Her. $1194 $969 

IP225w/1210. 1250 options. List $984 834 
IP225w/trector. 1210*. 2K buffer. & 

graphics options. List $1098 ... 899 
TRS80 cable . . .45 

•1210 option is e«panded/compreaaed print. 




The Fantastic Letter-Quality 
Printer at 55 cps ^^ 

6630 RO/Ontronics Interf.. $3086 $2689 
(shipped freight col lectl 

Printers for TRS80 require Level II machines. 

Printer cables extra. Call for price and drder 

number. 

• Same as Line Printer I 

t Same es Line Printer II 



SHlPPiNG t AND INSURANCE Add $5 for Sefectnc Convener. 56 for disk drives $10 tor MeoaDO* Centronics primers shipped freight 
collect Contact us tor shipping information on other printers 
AH prices subfect to change and ah otters subject to withdrawal without notice Prices m this ad are for prepaid orders Slightly tvgher prices prevail tor 



otner-than-prepaid orders I.e.. COD . credit card, etc 



- WRITE FOR FREE CATALOG - 



MiniMicroMart, Inc. 

1618 James Street, Syracuse, NY 13203 (315)422-4467 TWX 710 541 0431 




TRS-80 
SERIAL I/O 

• Ibt ra.t -ta case 



i'- i 



u 



1 1 H ■ i ■• 'i i , • 
RS 23? compatible • 
Can be used with or 
without the wwnw 
BueeOnboaras*itcr> 

selectable baud rates 
of 110. 150 300. 800 
1 2O0. 9400 parity or 
no parity odd or ever 
5 to 8 data Ms and 1 
or 2 stop bits. 0.TR 
una • Requires *5 
-12 V0C e Boero only 
$19 95 Part Mo 8010 
iMth part* S59 95 Pan 
Nd 801 OA. assembled 
$78 85 Pan No BOO 
C. Mo connectors pro- 
rf'oad aaa baiow. 




M»W» ;«• 


HIV • » 


*• 


oavauB 




• 1 W"«m 




■Mil M*vt ~ 


■» a ••- 






» -Mn «•» 




• - . j •»< .. 




•ikikH'M 


f^B_ 


•0 M fc» •»• 






'was 


k% run 



COMPUCRUISE 




S1 2995 wthcnjse con- 
trol $169 95 



THETELESIS 

VAR-80 

INTERFACE 

UNIT 




For the TRS-80 with 
Lev* « Bee* e Provides 

i a 
routs • 2 ft of rtar- 
cannecfanocsblew/con- 

' a 'I. | L'-OCt ,• 

Into TRS-80 • Power 
Suppiy provided • As- 
sembled and taatad 
PertNaVARBO Intra 
u <• 1 , grfceSIOfl 



SAME PADDLES 
& SOUND 




Includes: 2 9am* ped- 
dlae interlace, soft- 
ware, speaker, power 
suppry. full documen- 
tation mctudeig eehe- 
metics,. theory of 
operation, and user 
guide piue 2 games on 
cassette (Pong end 
Stars r*p War ». $7995 
Complete f- ■ 
7922C 



DIGICOM DATA 
PRODUCTS INC 

Series 31 2 
Acoustic Coupler 

a* 

300 BAUD Onorwta. 
Part No AC3122. 
1219 95 300 BAJO 
Answer Part No 
AC31 22 $219 95 
30DBAIJDAnswer/0r- 
■snataPertNjD AC3123 






LIGHT-PEN 
ForYourTRS-80 




ft « TS80L^t-Pan 

s a caret jIv engineered 
instrument and «*> the 

proper care wii g>w*e 
satisfactory use end 
many years of service 
Part No TRS80LP 
iMJO 



SYSTEM 

EXPANSION 

from 

LNW Research 



trotar • 32< bytes 

• ie 1 . 

er port • Dial cassette 
port • Reai-time dock 

• Screen printer bus • 
Onboard power super* 
a :., — ,. ., * 

• SoldB' rrttSfc «fc 

screen PC board and 
user mantai. Part No 
LNWBD.S6995 



DISKETTES 




BoaoMO 5 $?3H': 
8 $39.95 

Plastic boa. holda 10 
tokettes, b $4 SO 
8 $6 50 



1SKRAMB 
For the Apple 
TRS 80 or Pet $8 
each Part No. 4118. 

? I I • 



LEEDEX 

MONITOR 



CI 



12" Blank and v\- :? • 
1? MM/ Bandwidth 
• Handsome Plastic 
Case* $139.00 




AN 8-100 but Adactar— Nlo th erooard for the 
TRS-80 Kn Pan No HUHB10LXK. $29595 
Aassmtaiad. Part Na H JH8 1 C J( A. S37SS5 



NOMA 

A FULL SUPPORT SYSTEM 

FOR TRS-80 




• 32K of RAM • EPROM firmware • Cask 
control • Oate acquisition • Parallel I/O • 
Serial I/O • Plug into GPA's Motherboard. 
QPA's ojuatty design indudaa • 6-44 pm edge 
comectors • «5V; -5V. -1 2v*. -1 2v* external 
power supply required • Active Mrrnirajeon. 
Tna Motherboard Part No GPA80 « only 
$14995. 

TAKE ADVANTAGE OF 

GPA-EXPANSION CARDS 

FOR THE GPA80 

Memory cards: '•* ar compiiars 

available for your TR8-8O. eodtcne eapane>on 
mamorvaiarnusr'CardwithsociietsonN.PB-t 

N0GPA8OI $119 95 Ce i». • Hi-, if-v- 
Oynarnic Ram. Part No GPAB02. $224 95 

I.- 1 - *■. ; 1, 1 I- 11 I', • I. 

GPAB03. $32985. AH cards coma equipped 
w*r> sockets to accomodate 32K of Ram 
EPROM firawaaro eeret Put thote valuable 
subrajtawt in frnwrfsre Don t wesfr trme 
loading end unloading tapes and casks For 2708 
or 2716 EPROM8.PartNa GPAB06.879S5 
Serial I/O card Hares what you've been 
as* no for a fuf asnei tsrmrtal interface. waEh 
flS-232Cor20mA Current loop Input/ output 
cepsbacjes Part No. GPAB07 $7935 
Parallel I/O Card. Control functions n the 
outeaJe work), monitor and store real fame 
events T«w> parallel output pons Dip ■ witches 
■elect pons (0-254) Pert No, GPAfiOB. 
i M SB 



FLOPPY DISK 
STORAGE BINDER 




Threa-rmg order 
comas wttn tan trans 
parent plastic sajevea 
which accommooate 
either twenty hve-*>cr 
or ten eight-inch 
floppy disks. Binder & 
10nao»rs$ 14.85 Part 
No 8600; Extra hotter* 
95C each Part No BOO 



DIGITAL 
CASSETTE 




5 mm each side Box 
of 10 $9 95 Pert No. 
C-5 



DISK JACKET' 




Holds two 5-1/4 rch 
otakattas and ** •«, 

ary standard three nng 

- I K X 10 Peel 



TRENDCOM 
PRINTER 

U 

• - 1 - - ■ . 1 

tie 1 

.-. w 11 11 . mi a 

4B0 sevenoot 
print postions per are 
TRENDCOM 100. Part 
No TRC0 100.5495 96 
TRENDCOM 200. Part 
No TRCO20Q. $37595 
laterfaee far TRS-80. 

•* raoA m e 

for Apple II Pan No 
TRCAW 875 95 far 
PET. NO TRCP2. 
$7995 ForScaccersr. 
TRCSftl $•■' 



SARCON: A Computer 
Chess Program 

Faaturss the comptete program that won the 
197B West Coast Computer Fake Tourna- 
ment Part No 006O3 - TRS-BO Level II 
Pan No. 00604 - Apple H 124 K) $19 95 



SOUND EFFECTS AND MUSIC 
FOR YOUR COMPUTER 



»***£ 




• t "Tw"^a» ° f * *••* ** Con>|>ucatH H 

I ; V " I h , • 1 -. 1 liik.i 

a spssKer/arnplaar #h wth volume control, 
earphone jack, and connectors It boasts 
excellent tone questy yet ssmaJ andconverapnt 
to use Add bsttsnes pka it >a and play One 
.-, 1 eerreru • ..** aVARI sacaoe 
CBJdss INTRO to SOUNDWARE proorerns) 
PET I8K] Pan No 30OO3. 82895 TRB-80 
Level II <16K) Part No 20002. $39 95 
Comoucolor II I9<: Part No 20001. 839 95 
INTRO to SOUNDWARE progrems only PfT 
and TRS-80 Pert No 20005 81 4 95. Cornpu- 
coior ii Part No 20006. 81 9 95 



Th Ordflf' Mention pert no descnption. end price inUSAsNppir^r^dbyusfororxMrsaxxorr^ 

rv/ vn v«n . y^ accept c.O.D. ordere ay the U S only, or a VISA or Master Charge no . expiration date, signeture, phone no 
shipping charges will be added CA residents add 8.5% for tax Outside USA add 10% for air mail postage and han- 
dling Payment must bemUS dollars Dealer inquiries- invited 24 hour order ime (406) 448-0800 



Send for FREE Catalog a big self addressed envelope with At* postage gets it fastest' 



ELECTRONIC SYSTEMS *» 



P 0. Box 21638 San Jose CA USA 95151 



If you enjoy driving, you're going to got a 
COMPUCRUISE Ones you soe what It can 
do, you just won't bo able to live without it 



!«)■■■ 

i 



IB 55 



This Dade* Ills Into must dashboards . no strain even mi a tiny sports oar like tti« Maids KX ? . and 
once you have it every ir ip it i** tiymg a WF. Tra dar ned lh»n g tans you the lime how last you're going iw« 
tar you've Man on true trip or fries lha last repassing now many roues per gsfton you re getting, either at the 
tnaiant or th* average on the trip, .or gallons par Hour al themomenloi tor lha trip . temperature outside 
. . intrde (or coo a" I tarnperet ure. if you preton . . on, it net art eiapeed time tor the trip, a slop watch, lap 
time, an alarm . how rnuch runner tor yo«r trip, ho* rnarty gallon* mora the inp win lane, now mucn longer 
for tne trip at your preservi average spaed yea rt grves you your average speed to' lie top you prsts' 1 1- 
metr.o, no strain liters remaining eta Did we mention that it atao has causae control erttvar at a spaed set 
on the control board or at whatever speed you are traveling'* The CoryiDticruiee will keep you buey and enter 
tairted during any ire; . telling you more than you wi* ever want lo know 

Trva Cornptfcrviae Is not difficult to install . though H does conned to everything eiceof trie cigarette 
• ghtar until you »e tried computemed travel you haven't found out hovr much fun driving can be it*. a worn 
on any car not having toet mjeciion anc thara >s a troni-whaai dnve aeoaaaory gadget a«en*Die tor only 
OaOaPOOi regularly $5 90) 

Thaprioator the Coropocrurae'sregulerty 1108 96 . and a bargain allhel price. Wall sen you oneo'thaee 
far^aatic gadgets tor S1M.9!>withcruiseconttol|lworiei44-taX)02] and tt27.t9 without <Modei«t W0O3I Send 
money . ana start having tun' 



MAIL ORDER MICROS -<» 

Omqt. 580 • PO Box 487 • Marlboro NH 03455 
Phone: (603] 924-3041 * 




Steal Stopper 



Ever had your car stolen? 
The first reaction la one of dlabellef . . . 
. you know it was right thin) 

Wrel vouwen' » a modern co«rt*r»t>on *oc* on your ignition 
The Steel Stopper M s easy to mataii and almost impossible to 
defeat ton can by-peas It, •< you want tor parking attendants or a 
oar wash Other than that, you get a secret tour digit code and on*y 
ma than be sole so start the car . even ri you tM^o the Kays *■ 
»■ seaman. 

This protection fsia^s for ISO but we na»e a special tor you at 
tXV> Don't procrastinate Oder sPOCM 

Note Th* product works beat on Detroit cars. Maida RX? 
owners must order additional module aPOOB which costs 18. The 
Siaai Stopper can be rnodnajd tor Mer ce des Porsche Ferrari, or 
other high performance European oars by returning un4 to 
roanu lecturer mm (3 They promise o>'C* modN'canon and return 
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BRAND NEW* TRS-80 
and accessories at FANTASTIC SAVINGS 

LEVEL II 16K COMPLETE . $720 #TRS-001S 

16K EXPANSION UNIT $400 #TRS^)02S 

32K EXPANSION UNIT $525 •TRS-OW 

OISKDRIVES $425each (Specily which drive you want) #TRS-004 

FRICTION MODEL PRINTER $870 #TRSXX)5S 

TRACTOR FED MODEL PRINTER $1350 #TRS-006 

LINE PRINTER III (AND CABLE) $1550 eTRS-007 

MOD II 64K $3400 #TRSO08 



TERMS: Shipment normally within one week of receipt of your order (with cashier's 
check, money order, or credit card) (or microcomputer and three weeks for ac- 
cessories (checks take two weeks extra to clear bank). AOD $2.50 PER ITEM for 
HANDLING. Everything will be sent to you with UPS freight charges COLLECT. 

'NOT UPGRADED USED OR RECONDITIONED LEVEL IS WITH OLD KEYBOARDS 
BUT BRAND SPANKING NEW TRSSOs IN FACTORY CARTONS WITH FULL FAC- 
TORY WARRANTY! COMPARE PRICES AND QUALITY AND ORDER FROM MOMs 



ASTROLOGICAL 

COMPUTER AND 

4FUNCTI0N 

CALCULATOR 

ASTRO' 

Gives you a laaoneang too* mto 
«aur pcvsonsMty traits Comparee 
ift dU'erenl combination* 
Welches your eairoioaxai a"»> 
encea >o any day— paat present 
* •tiUre Ci«es •"■depth *ner»s l 
of your cor* »ei> 0*11, wMh your 
boss your spouse row love'. 
«Dur etMKi Reguiarry ftaaas 
apooao- SM 9ft sag cial pmct 



ASK MOM 


for details ol October taao Aaasn 


end European Etedrontes Tours 


See January Wayne Green edltori 


sis m K4oMud Microcoraptaiaa) 


and 73 Uaaanna tnfe arjOJ . No 


atjusjl 



HONEYWELL 

H Honeywell ASA 33 Coransunl 

cartons Consoles v. i I- 
paper tape reader and punch. 
Used, woriung erlvan rarnovao 
trom service snipped tre-oht 
coned or you pkK up Wetotit 
300 »». I»5 Order ePOOfj 



INSTANT SOFTWARE 
HALF PRICE SPECIAL 
CLOSEOUT-ONLY $4 



TeeVat. Laval L Gemaa 

Knagnts Ouest, Robot Cneee 4K- 

•ISW003 

Cava Exploring MK MSaXtO 

Ooodias A Ospiay i6K-ats«O0. 

fun PacKago I iftK-aiSKXMt 

TRSen, Laval L Rnanaa 
Status ol Homea t*mSKJ0M 

TPJfraD. Level ■ Hobby 
Model Nocketry Aneryrer. 
. - OM 
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BOOK CLEARANCE 
UP TO 50% OFF 

Ta*a ■ Clatnoa wttb Vour Ca*c jla 
lot SJa>iawt«i4>lkanar) fWkOO g 
-«w SSS6 hmWSO 

CrwrriMlry w.tb a Compuiai (Edit 

conrip^oOiiiraio «9KV010- wa» 

W 98, no* $8.00 
CoanpAjkar Dictionary tCatnaaol 

putmahaO iSKtOiB-was 18.09 

no* S3 00. 
FORTRAN Progtamnmng (Cams 

hOlDuOiiaborj #BKi0lf-wa» 

ST 98 now MM) 
FORTRAN Wo*Mh* rCair-OIOt- 

pubiiahar) IBKIOOO- anu M 96 

nowtaaa 

A Que* Look at BASIC (Canwrnl 

PuOtunan MK1043- »m «4 OB. 

BBWlfl 
How to Buy aM IM Mina and kt> 

crat <8ama-pwtxta«ari BBKiOBB 

— was SO 98, new 1800 
How »o Riaajrdm M"cnooonap»ila»a 

SWPHM/OWtwn tmiQ27- mm 

SB 98 row *4 50 
Your Own Computer iSarnt<*j& 

Hitter) *VF.t072-a,M »' 98. 

now SI 00 
SOBOA Bajgbook eSavrafrpuBiretier) 

• BK'103-was S9.96. now 

■O 
Pat.ofl'Cal OokM t»7S (Bang out> 

itarMO aBKi041-«M S3 00, 

laWtttO 
Parade* Guide 1077 iBerctx-o- 

iianar) ■Bm042-*aa S3.00. 

now Si SO 

Undatgrourtd Buying Qui da (FMaV 
KirwpubMnan •CaXi067-»aa 

S5se nowsaoo. 

Undo-eiandinc, Microcompjiara 

■ Scent*. outiwratO eemOTS- 

»ae S8.30 now S« 00 
Compclaior (TAB pjt>Hin«M 

•BK1012 wm S7.SS now I* 
Tt>e Stcy ol Computem rC«me«ot 

DMtxeanan •BKiOSBa.aa U 98. 

noa.S2.90 
Fun with Ccmpuiett and BASIC 

iCanpiOl pjbl.»*ar FBKIWI 

wad S* 96 new S3 50. 
introduction to MtcropnooMIOtt 

iMKrotoa-ptiMniaO »8Ki032 

waaS17 5C now SB 78. 
M-c*occnpjia» Dictionary <Mattia 

pjbnaner) fS*K)3A*d» |'5M 

now SB 
M»coco<npjta' Fruiter pSarnapab 

l.inon «BMi038wai S' 96. now 

84 



SPfCiAl PfliCf tnciuuaanwrainafias 
oajoouM a injdtcatai a>tia plea raduc 
(ton etrce lett m 

Quanteatt art Mam ted inamediete rotund 
<> ordered ilam la no toooar awaiiatna 

TEaMfcr-OSM*flDOft).NHUBA tanned 
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PW* 12 50 af'0p-"a and Handling tna-ge 
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inapomo + Oonunenlei USA afftaaM 
where (Ma wm rv'uM eaeett i Order* 
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03456. 
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SIMULATED SURVEILLANCE VIDEO SYSTEMS 

Sxca ina xoao aaa-wa tyiwna «a loaaiiy poyoboioaleai. »at n wo »i«i6" 
iiy ane «ugoaat<n ol wdao cawwaa at wnai aaaara ina W>t' * oaaaa to ataa 
an mat ta raaa> "aadad « • mnlta mm appaara lo ba a fcxictaanmo. «Wao 
carwaia Tha *t» Syaaam prowoai ma buanaaaai" *«imi 

- at raw araianat ai a ••aonon of Ma eoat. bacauaa Via I 
aianai boaaa am amply of aaaciromct. am aoatoba oaooM atm t know a>it 
andSSV Sy t aa m t araan-aww', -aaaal.c maatan Bama tcan baet ant Kk» 
ano an »•»• rod naon hgaaa Tnav 'aaaura aaay inataaai>on. aasuni or an. wwa 
tstut mm* ooniitucnor tMouajriotA. win aarnioa Union paint, an atumnaw 
kant bama) wa»> t-tiopa. tooaaga anarkaaja. and oon«a« optica, txwwtatad eoan» 
Wcat . andwaPaatia rnanuiaeaurar-aaamnolbonaloMafanaaa phjiwamhag 
atlohara aasfejdad w» aji otdara. 

6« SOD Scanning canaaia ataiyata i» oagraa tcanaano action. loncHHa 
9MW1 1 rpni motor, art, |t00 <raaMany|i i» W. caU«o FFOO W IVtaKua 
•onary aanca m aoiutaab « to an. ancda lor Baad «k»w atnataga •• amount- 
mo vaoaait awa naaowana. c«» SMaapjavi. tM W. cataio* aPOOir o. go 
%ti ciaaa wan ma 8V 82000. wnten bat a aol atua 'mat* «• aatm myaai mar 
wilyS'06(n»Quian>.Si24.aelc«aioa**OOI2 maaati<onarv wjruon ta oray BBS 
-aovt'trbCUBOcaialooanoCW Alarm boat waon*r S20pagu«a»r. 12*93) 
aja) , IdfJBMa • !«•:•••». ajBfjl IhajkajaM • .«a» - ■ - dj • a 
naaaiiad at your Owl aaaa. honaa or ofi>oa 
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• PROGRAMMING THE Z-80 - BK 1 122 - by Rodnay Zaks. Here is 
assembly language programming for the Z-80 presented as a pro- 
gressive, step-by-step course. This book is both an educational 
text and a self-contained reference book, useful to both the begin- 
ning and the experienced programmer who wish to learn about the 
Z-80 Exercises to test the reader are included $14.96 ' 

• Z 80 SOFTWARE GOURMET GUIDE AND COOKBOOK - BK1045 
-by Nat Wadsworth Scelbi's newest cookbook! This book con- 
tains a complete description of the powerful Z-80 instruction set 
and a wide variety of programming information Use the author's 
ingredients including routines, subroutines and short programs, 
choose a time tested recipe and start cooking! $14.95 ' 



A"** UU 



e BASIC BASIC (2ND EDITION)- BK1026 - by James S 
Coan. This is a textbook which incorporates the learning of 
computer programming using the BASIC language with the 
teaching of mathematics. Over 100 sample programs il- 
lustrate the techniques of the BASIC language and every sec- 
tion is followed by practical problems. This second edition 
covers character string handling and the use of data files. 
19 45.* 



• LEARNING LEVEL H-BK1l75-by David Lien Written 
especially for the TRS-80, this book concentrates on Level II 
BASIC, exploring every important BASIC language capability. 
Updates are included for those who have studied the Level I 
User's Manual. Sections include: how to use the Editor, dual 
cassette operation, printers and peripheral devices, and the 
conversion of Level I programs to Level II $15.96 * 

eTRS-80 DISK AND OTHER MYSTERIES - BK1 181 - by Harvard C. Pennington. This is the definitive work on the TRS-80 disk 
system It is full of detailed "How to' information with examples, samples and in-depth explanations suitable for beginners and 
professionals alike. The recovery of one lost file is worth the price alone. $22 50.' 

• Z-80 ASSEMBLY LANGUAGE PROGRAMMING- BK1 177- by 
Lance A. Leventhal. This book thoroughly covers the Z-80 mstruc 
tlon set. abounding in simple programming examples which illus- 
trate software development concepts and actual assembly 
language usage Features include Z-80 I/O devices and Interfacing 
methods, assembler conventions, and comparisons with 
BOSOA/BOSS instruction sets and interrupt structure $12.60 ' 

• INTRODUCTION TO TRS-80 GRAPHICS- BK1 180 -by Don In- 
man. Dissatisfied with your Level I or Level n manual's coverage of 
graphics capabilities? This well-structured book (suitable for 
classroom use) is ideal for those who want to use all the graphics 
capabilities built into the TRS-80. A tutorial method is used with 
many demonstrations. It is based on the Level I, but all material is 
suitable for Level II use $8 95 * 

• THE INCREDIBLE SECRET MONEY MACHINE - BK1178- by 
Don Lancaster. A different kind of cookbook" from Don Lan- 
caster Want to slash taxes Get free vacations 7 Win at in- 
vestments'' Make money from something that you ilk* to do 7 
You'll find this book essential to give you the key insider details of 
what is really involved in starting up your own money machine. 
$5.95.* 

e FREELANCE SOFTWARE PUBLISHING - BK1 179-by B J. Kontes This book isaboul money and 
how to make it by writing and selling computer programs, tauthor*s foreword). If you have the skills to 
write a saleable program, you now need to acquire the skills to sell that program This compact book 
comprehensively covers the entire publishing process and many aspects of software salesmanship 

$14 95." 
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• THE BASIC HANDBOOK - BK1 1 74 - bv David Lien. This book Is 
unique. It Is a virtual ENCYCLOPEDIA ol BASIC While not favoring 
one computer over another, it explains over 250 BASIC words, how 
lo use them and alternate strategies. If a computer does not 
possess the capabilities of a needed or specified word there are 
often ways to accomplish the same function by using another 
word or combination of words That's where the HANDBOOK 
comes in II helps you get the most horn your computer, be it a 

boltom-of-the-line micro or an oversized monster. $14.95.* 

• ADVANCED BASIC - BK100O- Applications and problems by 
James Coan is for those who want to extend their expertise with 
BASIC Offers advanced techniques and applications. $9 65.' 

• PIMS: PERSONAL INFORMATION MANAGEMENT SYSTEM - 
BK1009 - Learn how to unleash the power of a personal computer 
lor your own benefit m this ready louse database management 
program $9 95.* 

• PAYROLL WITH COST ACCOUNTING -IN BASIC - BK1001 - 
by L Poole & M Borchers. includes program listings with remarks. 
descriptions, discussions of the principle behind each program, 
file layouts, and a complete user's manual with step-by step in- 
structions, flowcharts, and simple reports and CRT displays 
Payroll and cost accounting features include separate payrolls for 
up to 10 companies, time-tested interactive data entry, easy cor- 
rection of data entry errors, job costing (labor of distribution), 
check printing with full deduction and pay detail, and 16 different 
printed reports, including W-2 and 941. $20 00 * 

• LOW COST. PERSONAL COMPUTER BASED INVESTMENT DECISION SYSTEMS- BK1 101 -Use this guidebook by Man- 
Computer Systems, Inc. s president. Jerry Feisen. to develop inexpensive personal computer systems thai can help you make 
better investment decisions $15 00 * 

• HOW TO MAKE MONEY WITH COMPUTERS- BK1003-ln 10 Information-packed chapters. Jerry Feisen describes more 
tnan 30 computer-related, money-making, high profit, low capital investment opportunities. $15 00.* 




WHAT TO DO 
RETURN 



p.cc.'»^'' r »' Bo< * 0, 

Can**** Go*«»»| 




• SOME COMMON BASIC PROGRAMS - BK 1053 -published by 
Adam Osborne & Associates. Inc Perfect for nontechnical com- 
puterisls requiring ready touse programs. Business programs. 
plus miscellaneous programs. Invaluable for the user who is not 
an experienced programmer All will operate in the standalone 
mode. $12 50 paperback.* 

• WHAT TO DO AFTER YOU HIT RETURN - BK1071 - PCCs first 
book of computer games ... 48 different computer games you can 
play in BASIC . . . programs, descriptions, many illustrations 
Lunar Landing, Hammurabi, King. Civel 2, Qubic 5, Taxman. Star 
Trek. Crash. Market, etc. $10 95.* 

• BASIC COMPUTER GAMES- BK1074 - Okay, so once you get 
your computer and are running m BASIC, then what? Then you 
need some programs in BASIC, that's what This book has 101 
games for you from very simple to real buggers. You get the 
games, a description of the games, the listing to put in your com- 
puter and a sample run to show you how they work. Fun. Any one 
game will be worth more than theprlce of the book for the fun you 
and your family will have with It. $7.50.' 

• SIXTY CHALLENGING PROBLEMS WITH BASIC SOLUTIONS 
(2nd Edition)- BK 1 073-by Donald Spencer, provides the serious 
student of BASIC programming with interesting problems and 
solutions. No knowledge of math above algebra required. Includes 
a number of game programs, as well as programs for financial In- 
terest, conversions and numeric manipulations. $6.95 * 



U*e trie order CMd in tfie back oi ttiis rnafadna of Hemim your order on a separate piece of paper and mail lo 
SO *4Jr»tKorT<i*Minfl Boofcihelf • FVtrmoroufl* NH 03458. Be Mjrc lo ■ttluefe chKk or detail** rrerJk cart* InlomtMiorv AM otdars add * 1 .00 hanrfii 
Plwse allow 4 6 «<-<*• for doftvery. Questions raiding yeia m dee? Ptrmse write lo Customer Service at the above address 
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FOR TOLL FREE ORDERING CALL 1-800-258-5473 
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PREVIEW 



WHAT TO LOOK 
FOR IN THE 



JUNE 



SO 



INSIDE LEVEL I 

An indepth look at the power and 
potential of the Level I ROMs. 
Often scorned by converts to 
Level II, the basic BASIC is still a 
language to be reckoned with. 



RANDOMNESS TESTING 1, 2, 3 



The ins and outs of randomness 
are explored in an ordered man- 
ner. Check the distribution of 
your randomness with a bar 
graph demonstration program. 



Hook up your 80 to the outside 
world, via its parallel ports, and 
input measurements directly to 
your program. Get rid of pen and 
graph paper! 



LIFE 

Is there life within your comput- 
er? There will be next month, 
with the game of Life. Watch 
thousands of generations flash 
before your eyes in minutes. If 
you don't like the way evolution 
is progressing, then stop the ac- 
tion and play "GOD"! 



ALL THIS PLUS 
MUCH MORE! 
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Ask for Instant Software at a computer store near you. 



Alabama 

Anderson Computer* 

3'5€ University Or . Huntsvtlle 

Computeriand ol Huntsviile 

3020 University Dr Huntsviile 

Olensky Bros 

3763 Airport Blvd Mobile 

Arizona 

Mam Snack 

450 6-A N 16tn St . Phoen,. 

Millets TV & Radio 

621 East Broadway. Mesa 

California 

Byte Shop 

8038 Clairmom Mesa Blvd . 

San Diego 

Byte Shop ot Mt View 

1415 West El Camino Real Mt View 

Byle Shop ot Sacramento 

6041 Greenback Ln . Citrus "eight! 

Capital Computer Systems 

3396 El Camino Ave . Sacramen'o 

Computers Made Easy 

819 East Ave 9 Paimdale 

Computer Store ol San leandro 

701 MacAnhur Blvd . San Leandro 

Computer World 

6791 Westminster Ave . Westminster 

Computeriand 

16720 S Hawthorne. Lawndale 

Computeriand ol W IA 

6840 La Cienega Blvd . Inglewood 

Coast Electronics 

3118 No Mam Si Morro Bav 

Computeriand 

24001 via Fabncante No 904. 

Mission Vie|0 

HobOitronics 

1378 So Bascom Ave San Jose 

Hobby World 

19511 Business Ctr Or Unit 6 

Borthndge 

ICE House Inc 

398 North E St Sao Bernardino 

Jade Computer Products 

4901 W Rosecrans HMIdOiM 

OpampTechnical Books 

1033 N Sycamore Ave Los Angeles 

Q I Computers Ire 

<S818 Hawthorne Blvd Law"daie 

Radio Shack Dealer 

8250 Miia Mesa Blvd San 0'eoo 

Radio Shack Dealer 

50 N Cabmio Hwy . Hall Moon Bay 

Santa Rosa Computer Center 

604 7th St Santa Rosa 

Stive* Spur E'ect Comm 

13552 Central Ave , CMno 

The Computer Store 

820 B-oadway. Santa Monica 

Colorado 

Byte Shoo 

3464 S Acoma St Englewood 

Colorado Computer Systems 
311 W 74th Ave . Westminster 
Compuleriand ot North Denver 
8749 Wadsworth Blvd Arvada 
Computer Shack 
1635 South Prairie. Pueblo 
The Computer Store 
2300 WeHon SI Denver 

Connecticut 

American Business Computers 

454 Thames St Groton 

Computerlab 

130 Jetterson. New London 

Computeriand 

1700 Post Rd Fairfield 

Computer Works 

1439 Post Rd E Liberty Piaza 

Westport 



D.C. 

The Program Store 

4200 Wisconsin Ave N W . 

Washington. D C 

Florida 

Adventure International 

200 Bald Cypress CI Longwood 

AMF Electronics 

11146 N 301h St Tampa 

Boyd Ebert Corporation 

1328 West 15th St Panama City 

Computer Center 

6578 Central Ave . St Petersburg 

Computeriand of Ft Lauderda>e 
3963 N •'■•'< Hwy Ft Lauderdale 



Computeriand of Jacksonville 

27774 University Blvd W 

Jacksonville 

Computer Shack 

3336 Beach Blvd . Jacksonville 

Curtis Waters Enterprises 

236 Talbot Ave Melbourne 

Heath Kit Electronic 

405 W 16th Ave Center. Hiaieah 

HIS Computermation 

1295 Cypress AvTalbot Ave . Me*cw"e 

Heath Kit Electronic 

4705 W 16th Ave Cenie-. Hia'eah 

HIS Computermation 

1295 Cypress Ave . Melbourne 

Sound Ideas 

2201 CN.W 13lh. Gainesville 

Ukatan Computer StO'e 

Airport Rd . Destin 

Williams Radio & TV Inc 

2062 Liberty St Jacksonville 

Georgia 

Atlanta Computer Man 

Atlanta 

Computeriand of Atlanta 

2423 Cobb Parkway. Smyrna 

Hawaii 

Computeriand of Hawaii 

567 N Federal Hwy . Honolulu 

ladio Shack Assoc Store 

1712 S King Si Hono'ulu 

Idaho 

Electronic Specialists 
841 1 Fairview Ave . Boise 

Illinois 

Compuleriand 

4507 Nonh Sterling Peoria 

Corr puierland 

951' N Milwaukee Ave N.ies 

Computer Station 

3659 Nemeoki Rd Granite City 

Midwest Micro Computers. Inc 

708 S Mam St . Lombard 

Indiana 

Computer Center of South Bend 
51591 US 31 North South Bend 
Data Domain 

221 w Dodds. Bloommgton 
Fall Creek Electronics Store 
732 Center St . Pendielon 

Iowa 

Memory Bank 

4128 Brady St . Davenpo-t 

Kansas 

Central Kansas Computers 
6 S Broadway HfHngtOO 

Louisiana 

Computer Snoppe Inc 

3225 Danny Pan. Suite 222 Metame 

Mains 

Rad'O Shack 

315 Mam Man Rd So Portland 

Maryland 

Jack F.ves Electronics 

4608 Oebiien Circle Pikesviiie 

The Comm Center 

9624 Ft Meade Rd Laurel 

Massachusetts 

CompulerCity 

1 75 Main St . Charleslown 

ComputerCity 

50 Worcester Rd . Framingham 
Computeriand o' Boston 
214 Worcester Rd Wellesley 

Computer Packages Unlimited 
244 W Boylston St . West Boylslon 
Lighthouse Computer Software 
14 Fall River Ave Rehobath 
New England Electronics Co 
679 Highland Ave . Needham 

The Computer Store 
120 Cambridge St Burlington 
Tufts Radio & Electronics 
206 Mystic Ave Medlord 

Michigan 

Compuler Center 

28251 Ford Rd.. Garden City 

Computer Connections 

38437 Grand River. Farminglon Hills 

Computeriand of Grand Rapids 

2927 28th St. S E . Kenlwood 

Computeriand oi Rochester 

301 S LivernoiS. Rochester 

Computeriand of Southfieid 

29673 Northwestern Hwy Southfieid 

Computer Mart 

560 W 14 Mile Rd Dawson 

Hobby House 

1035 W Territorial Rd . Battle Creek 



Instant Software Inc 



The Alternate Source 
'806 Ada. Lansing 
ve Oide Teacher Shoppe 
1823 Witmyre St Yps'lanti 

Mlnnasota 

Computeriand of Hopkins 
1 1319 Hwy F Hopkins 
Digital Den 

Burnsville Center 

Minnesota Software Inc 

5422 Fisher St Wife Bear Lake 

Zim Computers 

5717 xer«es Ave N BfOOkDn Cenlei 

Mississippi 

Dyer's Inc 

200 E. Main SI . West Point 
W Vernon Fosler Inc 
816 Foley St Jackson 

Missouri 

Computervan. Inc 

51 Florissant Oaks Shopping Cente' 

Florissant 

Consolidated Software 

16501 Greenwa'd Court Be'fon 

Minnasota 

Computeriand of Hopkins 
11319 Hwy F . Hopkins 

Digital Den 

Burnsville Center 

Minnesota Software Inc 

5422 Fishei St White Bear Lake 

Zim Computers 

5717 Xer.es Ave N BrOOklifl Center 

Nebraska 

Compuleriand of Omaha 
11031 Elm St Omaha 
Midwest Compuler Co Inc 
8625 I St . Omaha 
Midwest Computer Co Inc 
4442 S 84th St Omaha 
Midwest Compuler Co Inc 
4403 S 87th St Omaha 

Nevada 

Century 23 

4566 Spring Mountain Rd Las Vegas 

New Hampshire 

Bitsnbytes Computer Center 

568 Peasant Si Concord 

ComputerCity 

1525S W'llow Manchesler 

Paul s TV 
Main St Fremont 
Portsmouth Computer Center 
31 Raynes Ave Porlsmouth 
Radio Shack Assoc Store 
Fairbanks Plaza Keene 

New Jersey 

Computer Encounter 

2 Nassau St Princeton 

Computeriand 

35 Piaza Rte M W Pa-amus 

Computer Mart of NJ 

501 Rte 27 Iselin 

Daves Electronics 

PennsviMe Shopping Ctr Pennsvi'e 

Personal Computing inc 

51 Central Sq Lmwood 

Radio Shack'J&J Electronic 

Mansfield Shopping Clr 

Rl 57 Allen Rd . Hacketlstown 

The Bargain Brothers 
Glen Roc Shopping Center 
216 Scotch Road Tienlon 
Tne Computer tmpo'ium 
Bldg '03 Avenues ol Commerce 
2428 Rie 38 Cherry Hill 

New Mexico 

Antei Electronics Co 

232 Wisconsin N E Albuquerque 

Legey ana Associates 

2908 Tahiti Cl N E Albuquerque 

Mitchells Music (Radio Shaoi 

407 W Church Carlsbad 

South West Computer Center 

121 Wyatt Drive Suite 7. Las Cruces 

New York 

AnsloCiatl 

314 Fifth Ave . NYC 

Bits & Byles 

2800 Straight Rd . Fredonia 

Computer Corner 

200 Hamilton Ave White Piams 

Computer Eia Corp 

1570 3rd Ave . New York 

Computer Factory 

485 Lenngton Ave NYC 

Computer House. Inc 

721 Atlantic Ave . Roc fester 

>s2 



Computeriand of Nassau 

79 Westbury Ave . Cane Place 

Computer World 

5' 9 Boston Post Rd . Port Cheste' 

Comtek Electronics. Inc 

2666 Coney island Ave . Brooklyn 

Comtek Electronics. Inc 

Staten island Mall 

Store 220A Staten Island 

Home Computer Center 

671 Monroe Ave Rochester 

Key Electronics 

Schenectady 

Lashen Electronics Inc 

21 Broadway. Denville 

Mr Computer 

Imp Plaza. Rle. 9. Wappingers Falls 

Sollron Systems 

308 Columbia Turnpike. Rensselaer 

The Computer Tree Inc 

409 Hooper Rd Endwe" 

Upstate Computer Shop 

629 French Rd Campus Plaza 

New Manlord 

North Carolina 

Byte Shop of Raleigh 

1213 Hillsborough St . Raleigh 

Ohio 

Ana" Busmess Systems Inc 
5252 North Dime Dr Dayton 

Astro Video Electronics 
504 E Mam St . Lancaster 
Cincinnati Compuler Store 
4816 Interstate Dr . Cincinnati 
Compuleriand 
4579 Great Northern Blvd 
N Olmslead 
Compuleriand 

6429 Busch Blvd Columbus 
Computeriand 

1288 Som Rd . Mayfieid Heights 
Computer Store o' Toledo 
18 Hiilwyck Dr Toledo 
Forbees Microsystems inc 
35 N B-oad Fairborn 
Microcomputer Center 
7900 Paragon Rd Dayton 
Micro Mini Computer World 
74 Robmwood Co'umbus 
Universal Amateur Radio, ire 
1280 Aida Dr . Columbus 

Oklahoma 

Sounds. Etc. 

Hyw 33. Watonga 

Vern Street Products 

Radio Shack Dealer 

'14 w TaH St Sapuipa 

Oregon 

Computeriand of Portland 

12020 S W Mam St Tigard 

Computer Pathways Unlimited Inc 

2151 Davcor St S E Salem 

Pennsylvania 

Audio Mart 

518 Fittn Ave New Brighton 

Artco Elect 

302 Wyoming Ave Kingston 

Artco Eeei 

Back Mountain Shop Ctr 

Shaver! own 

Computer Workshoppe 

3848 William Penn Hwy. Monroeville 

Computeriand ot Harnsburg 

4644 Carlisle Pike Mechamcsbuig 

Erie Computer Co 

2'27 West 8thSt . Ene 

Mighty Byte Compuler Center 

537 Easton Rd . Hersham 

Personal Computer Corp 

24 26 West Lancaster Ave Paoii 

Personal Computer Corp 

Frazer Man. Lancaster Ave Frazer 

Rhode Island 

Computer City 

165 Angel I St Providence 

South Dakota 

C8 Radio Shack 

2 1st and Broadway Yankton 

Tennessee 

Compulerlab 

671 S Mender Hall Rd . Memphis 

H & H Electronics Inc 

509 N Jackson Si Tullahoma 

Texas 

Computer Port 

926 N Collig Arlington 

Houston Microcomputer Tech 

5313 Bissonet. Bellaire 

K A Elect 

9090 Stemmons Frwy . Dallas 



Pan American Elect Inc. 
1117 Conway Mission 

Radio Shack Dealer 

2'969 Katy Freeway. Katy 

Ram Micro Systems 

6353 Camp Bowie B'vd Ft Worth 

Utah 

Ouaiity Technology 

470 E 2nd So San Lake City 

Virginia 

Home Computer Center 

2927 Virginia Beach Blvd 

Virginia Beach 

Southside Radio Comm 

135 Pickwick Ave . Colonial Heights 

Washington 

American Mercantile Co. Inc 

2418 1st Ave S . Seaitie 

Byte Shop ol Bellevue 

14701 N E 20th St . Bellevue 

Computeriand ot South King Co 

1500 S 336 St Suite 12 

Federal Way 

Magnolia Micro Systems 

2812 Thorndykc Ave Seatti* 

Personal Computers 

S 104 Freva Spokane 

Ye Old Computer Shop 

1301 G Washington. Richland 

West Virginia 

The Computer Corner Inc 

22 Beechursl Ave Morgantown 

The Computer Store 

Municipal Parking Bldg . Charlestor 

Wisconsin 

Byte Shop Of Milwaukee 

6019 West Layton Ave . Greenfield 

Compule'land 

690 S ;\-i i •■,.-•■, Way Madison 

Petted Microsystems 

4265 W Loomis Rd Milwaukee 



Puerto Rico 

The Microcomputer Store 
1568 Ave Jesus T Pmero 
Caparra Terrace 
Canada 

CANADIAN DISTRIBUTORS 

Micron Distributing 

409 Queen SI . W Toronto. Onl 

MSV 2A5 

Compuleriand ol Winnipeg 

715 Portage Ave . Winnipeg. Man 

Compumarl 

411 Roosevelt Ave Ottawa Ola' o 

Compuler Mart Lid 

lOSSYongeSt Suite 208 

Toronto Ontario 

Gaiactia Computers 

103rd Ave Edmonton Alberta 

Micromatic Systems Inc 

101 8136 Park Rd . Richmond B C 

Micro Shack ot W Canada 

333 Park Street Regma Sask 

Orthor Holdings Ltd 

1241' Stony Plain Road 

Edmonton Alpena 

Total Computer Systems 

Aja» Ontario 

England 

Tamays & Fan Ltd 
4 Morgan SI . London 

France 

Sideg 

45 Rue de la Chapeile Paris 

Sivea s a 

20 Rue de Leningrad Paris 

Italy 

HOMIC s r I 

Piazza De Angeh 1. Miiano 

West Germany 

Electronic Hobby Shop 
Kaiserslr 20. Bonn 
MicroShop Bodensee 
Markslr 3. 7778 Markdorf 

Australia 

Compulerware 

62 Paisley St . Footscray VIC 

Deloresl Software 

36 Glen Tower Drive 

Glen Waverly VIC 

Sotlromcs Micro Systems 

Lmdfield 

Sure Load Software 

P O Bo» 26. Weston ACT 

South Africa 

Eddie Taiberg 

P O Boi 745 Johannesburg 



Peterborough, New Hampshire 03458 603-924-7296 




STARTER KIT 



EXATRON STRINGY FLOPPY FOR THE TRS-80 



Recommended initial purchase: 




SPECIAL PRICE FORTHIS STARTER KIT 


$299.50 


Exatron Stringy Floppy 


$249.50 


Sales Tax (Califotji»ia only) 




3 Wafers each: 5M0', 20', 50' 


40.00 


Shipping and Handling 


5.50 


Bus Extender. 2-for-1 


15.00 


TOTAL 




ESF Machine Language Monitor 


9.95 








$314.45 







For more information see the current Exatron Stringy Floppy Owners Association Newsletter in Microcomputing. 



lucl, abou! Exalror 
ers lo ESFOA 3669 Ryder SI . Santa Clara, CA 




*• i 



excellence in electronics 



, is a tradema 'Corporation. 

HOT LINE (For Calls Outside CA) 800-538-8559 

exatron 

3555 Ryder Street ■ Santa Clara, California 95051 
(408) 737-7111 



